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EINLEITUNG 


Jetzt gekt's aufwärts 


E s ist noch kein Meister vom Him¬ 
mel gefallen! Auch nicht bei den 
Computer-Freaks. Ganz im Ge¬ 
genteil, gerade die ersten Schritte in 
die Computertechnik fallen einem 
nicht leicht. Wir wollen Ihnen mit die¬ 
sem 64’er-Sonderheft nicht nur hel¬ 
fen, die ersten Hürden zu überwinden, 
sondern der Einstieg in die C64-Welt 
soll so leicht wie möglich sein und 
natürlich Spaß machen. 

Ein ausführlicher Basic-Kurs wird 
Sie bei den »ersten Schritten« mit 
Ihrem neuen Computer begleiten und 
auf interessante Weise auch all die 
lästigen kleinen Fehleraufdecken, die 
anfangs häufig gemacht werden, 
denn Programmieren soll ja ein Hobby 
werden, das Ihnen Spaß macht. »Programmieren« - sicher 
ist dies für Sie noch ein Zauberwort, das mit etlichen Rät¬ 
seln verbunden ist. Aber anhand des Basic-Kurses werden 
Sie merken, daß damit auch schnelle Erfolgserlebnisse 
verbunden sind. 

»Wissen ist Macht« heißt es so treffend. Ein Computerle¬ 
xikon, das sicher noch lange ein wichtiges Nachschlage¬ 
werk bleibt, wird Ihnen immer wieder helfen, weitere 
Erkenntnisse über den Computer zu erlangen. Von A bis Z 
finden Sie Fachbegriffe verständlich erklärt. 

Wenn Sie erst ein paar Programme selbst geschrieben 
haben, wird es Ihnen sicher bald lästig, daß ein Programm 
jedesmal, nachdem Sie den Computer ausgeschaltet 
haben, gelöscht ist. Also, ein Massenspeicher wie ein Dis¬ 
kettenlaufwerk oder eine Datasette muß her. Der Umgang 
mit Disketten bietet erheblich mehr Komfort als eine Data¬ 
sette, zumal bei Commodore-Laufwerken eine »intelli¬ 
gente« Elektronik integriert ist. Die Steuerelektronik des 
Diskettenlaufwerks kann eine Vielzahl von Fehlern selbst 
analysieren und dem Computer mitteilen - unabhängig, ob 
die Diskette fehlerhaft ist oder Sie das Gerät falsch bedient 
haben. Auf dem Monitor erscheint dann eine mit Code- 
Zahlen vermischte und zumeist ohnehin unverständliche 
Fehlermeldung. Wir zeigen Ihnen, was all diese Meldun¬ 
gen zu bedeuten haben und wie Sie die meisten Fehler ver¬ 
hindern können. Wenn Sie Zugriffe auf die Diskette in 
eigene Programme selbst einbinden wollen, werden Sie 
sehr bald merken, daß Ihr Programm bei jeder Fehlermel¬ 
dung »aussteigt«. Wie so etwas geschickt zu verhindern ist, 
erfahren Sie ebenfalls. 

Zum Thema »Programmieren« gibt es natürlich eine 
Menge Tips & Tricks. Besonders über PEEKs und POKEs 
lassen sich diverse Probleme einfach lösen, die in der nor¬ 
malen Basic-Programmierung nur sehr schwer oder gar 


nicht bewältigt werden können. Und 
warum sollen Sie »das Rad noch ein¬ 
mal erfinden«, wenn wir dank der 
Unterstützung unserer 64’er-Leser auf 
einen mehrjährigen Erfahrungsschatz 
zurückgreifen können. 

Für Sie haben wir diese PEEKs und 
POKEs zusammengefaßt und über¬ 
sichtlich geordnet, damit Sie den ent¬ 
scheidenden Trick schnell finden kön¬ 
nen. 

Natürlich wollen Sie sich am Com¬ 
puter ab und zu einfach entspannen. 
Was ist dazu besser geeignet als ein 
Computerspiel? Zwei tolle Spiele 
haben wir ausgesucht, die Sie nur 
abzutippen brauchen. Dank unserer 
Eingabehilfen lassen sich fast alle 
Fehler beim Abtippen vermeiden. Wie Sie mit den Eingabe¬ 
hilfen umgehen müssen, finden Sie auf den letzten Seiten 
ausführlich erklärt. 

Sicher war für Sie auch ein Grund, sich für den C64 zu 
entscheiden, daß es für diesen Computer schon eine 
enorme Anzahl von ausgereifter Software gibt, und Sie bei 
Freunden oder Bekannten schon einige dieser faszinieren¬ 
den Programme kennengelert haben. Man will ja seinen 
Computer auch sinnvoll nutzen. Aus dem inzwischen kaum 
zu überschauenden Software-Angebot haben wir für die 
wichtigsten Anwendungsbereiche jeweils ein Spitzenpro¬ 
gramm herausgesucht, das Ihnen gute Dienste leisten 
kann. 

Dank des Erfindungsreichtums der Leser konnten wir im 
64’er-Magazin etliche Programme zum Abtippen anbieten, 
die den Vergleich zu kommerzieller Software nicht zu 
scheuen brauchen und diese sogar übertreffen. In einer 
Übersicht finden Sie eine Reihe unserer Programm- 
Renner beschrieben, die insgesamt eine hervorragende 
Grundausstattung ergeben. Computergrafiken waren da¬ 
bei schon immer etwas Fesselndes. Eine der schnellsten 
Grafikerweiterungen, die es für den C64 gibt, können Sie 
sogar abtippen. 

Wie Sie sicher schon gemerkt haben, wollen wir Ihnen 
mit diesem Sonderheft für den Einstieg in die »Computerei« 
das wichtigste Handwerkszeug zur Verfügung stellen. 
Natürlich kann ein Sonderheft nicht alles enthalten, was 
man gebrauchen könnte. Deshalb erscheinen zu den mei¬ 
sten Themen mehrere Sonderhefte, von denen jedes in 
sich selbst abgeschlossen ist. Ich möchte Sie daher noch 
auf das Sonderheft 16 aufmerksam machen, das ebenfalls 
für C64-Einsteiger gedacht ist und diese Ausgabe hervor¬ 
ragend ergänzt. 

Ihr Gottfried Knechtei (Redakteur) 
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Einleitung 


Floppyfehler abfangen 

Ein bedienungssicheres Programm 
muß auf alle möglichen Fehler vor¬ 
bereitet sein. Wir zeigen, wie’s geht. 


Jetzt geht’s aufwärts 

3 


H 122 

Software 


Leichter Einstieg in Geos 

124 

Nur vom Besten... 

Eine Auswahl der besten kommerziellen 

6 


Beschreibung der neuen Benutzerober¬ 
fläche des C64 

Programme für alle Anwendungsgebiete 



Grafik-Listings 

Die »Stars« der 64’er 

Übersicht der Top-Listings aus dem 
64'er-Magazin 

11 


Geschwindigkeit ist Trumpf... 

Mit unserem Listing »Hires-Master« ist die 
Programmierung von effektvoller und 
schneller Grafik ein Kinderspiel 

H 127 





Lernen mit dem C 64 

Kürztest von interessanten Lernprogram¬ 
men. Wie sinnvoll ist Lernsoftware? 

20 

Polydat - Dateiverwaltung 
schnell und komfortabel 

Ein echtes Superprogramm: 

»Polydat«, die Dateiverwaltung für viele 
Anwendungsbereiche 

H 146 

Spiele 



Der springende Punkt 

Tolles Reaktionsspiel zum Abtippen. Ein 
hüpfendes Roboter-Ei muß eine Nachricht 
überbringen. 



Tips&Tricks 

H Z9 

PEEKs und POKEs alphabetisch 

Nützliche Speicheradressen für Probleme, 
bei denen das C64-Basic nicht mehr 
ausreicht 

153 

Vorsicht vor den Minen! 

Spannendes Denk- und Taktikspiel. 

Mit einem Minensuchgerät ausgerüstet 
müssen Sie den Ausgang erreichen. 



H 35 

Wie von Geisterhand... 

Lassen Sie Ihre Programme nach dem 
Laden doch einfach von selbst starten! 

H 156 

Grundlagen 




Eingabehilfen 

Fragen und Antworten 

Profis geben Antwort auf die häufigsten 
Einsteiger-Fragen 



38 

Wie gebe ich Programme ein? 

Diesen Artikel sollten Sie unbedingt lesen, 
wenn Sie ein Programm aus diesem Son¬ 
derheft abtippen möchten 

157 

Computer-Lexikon 

»Fach-Chinesisch« schnell verstanden 

41 




Checksummer V3 und MSE 


Basic-Kurs: von Anfang an 

Unser großer Basic-Kurs für alle C64- 
Einsteiger. Lernen Sie den Computer 
selbst zu programmieren. 

n 49 

Zwei Eingabehilfen, die das fehlerfreie 
Abtippen von Programmen wesentlich 
erleichtern 

H 159 



Sonstiges 

Die 1000 Nöte der Datenspeicherung 

Was muß man beim Speichern von Pro¬ 
grammen auf Diskette oder Kassette 
beachten? Was bedeuten die unterschied¬ 
lichen Fehlermeldungen? 



Impressum 

162 

114 

Alle Programme aus Artikeln mit dem Q -Symbol finden 

Sie auf der Programmservice-Diskette zu diesem Sonder¬ 
heft (siehe linke Seite) 
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SOFTWARE 


C64 


Nur vom 
Besten.. 



Für den C64 gibt es eine kaum noch überschau¬ 
bare Anzahl an Programmen für jeden erdenk¬ 
lichen Zweck. Besonders für den Einsteiger wird 
es daher immer schwerer, das für ihn beste Pro¬ 
gramm herauszufinden. Grund genug, die stärk¬ 
sten professionellen Programme für den C64 
kurz vorzustellen. 


I m 64'er-Magazin wurden seit der Erstausgabe im April 
1984 bereits sehr viele Programme ausführlich getestet. 
Doch wie muß ein Programm aussehen, um zur Refe¬ 
renz-Software gekürt zu werden? Der wohl mit Abstand 
wichtigste Aspekt ist natürlich die Qualität des Produktes 
und sein Preis-/Leistungs-Verhältnis. In einigen Bereichen 
stellen wir Ihnen zwei Programme vor, die sich entweder im 
Preis deutlich voneinander unterscheiden oder aber in 
bezug auf den geeigneten Einsatzbereich deutliche Unter¬ 
schiede aufweisen. 


Produkt/Anbieter 

Test in Ausgabe 

Preis: 

Vizawrite 64 

10/84 

98 Mark 

Vlzastar 64 

DTM Werbung und EDV 

Bornholenweg 5,6200 Wiesbaden 

11/84 

298 Mark 

als Paket: 
mit Vizawrite 64 

348 Mark 

Startexter 64 

9/85 

64 Mark 

Stardatei 64 

4/86 

64 Mark 

Starpainter 64 

Sybex Verlag, Vogelsanger Weg 111, 
4000 Düsseldorf 30 

10/86 

64 Mark 

Hl-Eddl Plus 

5/86 

48 Mark 

Glga CAD Plus 

Markt&Technik Verlag AG 
Hans-Pinsel-Str. 2 

8013 Haar bei München 

2/87 

49 Mark 

Superbase 64 

5/84 

99 Mark 

Basic 64 

Data Becker, Merowinger Str. 30 

4000 Düsseldorf 1 

4/85 und SH 12 

99 Mark 

VIP-Terminal 

Klaus F. Erbrecht, Lappenbergs¬ 
allee 37, 2000 Hamburg 20 

Marktübersicht 

4/87 

51,30 Mark 

Sound-Expander 

Side by Side 

Landgraf-Philipp-Str. 65 

6000 Frankfurt 50 

9/87 

399 Mark 
Composer/Editor 

120 Mark 

Keyboard 

280 Mark 

Printfox 

Scantronic. Parkstr. 38, 

8011 Zorneding 

6/86 

98 Mark 

Print-Shop 

Softline, Schwarzwaldslr. 8a, 

7602 Oberkirch 

4/85 

129 Mark 

ASSI/M 

Dirk Zabel, Stresemannstr. 50, 

1000 Berlin 61 

1/85 

ab 220 Mark 


Eine Grundvoraussetzung für die Software-Referenz ist 
aber auch, daß das Programm in Deutschland vertrieben 
wird und auch erhältlich ist. In vielen Fällen haben jedoch 
auch unsere Leser entschieden. Durch unsere Umfrage- 
Wettbewerbe wissen wir, welche Programme besonders 
stark verbreitet sind und besonders häufig eingesetzt wer¬ 
den, also am beliebtesten sind. 

Auf den nachfolgenden Seiten finden Sie für die gängi¬ 
gen Einsatzgebiete des C64 besonders empfehlenswerte 
Programme. Aus Platzgründen ist es uns an dieser Stelle 
natürlich nicht möglich, alle Leistungsmerkmale und inte¬ 
grierten Funktionen aufzuzeigen. 

In vielen Fällen bieten jedoch die Hersteller oder Verteiler 
der Programme Informationsblätter an. Sicherlich ist nicht 
jedes Programm für jeden Anwender uneingeschränkt 
geeignet. Viele Programme fordern eine bestimmte 
Hardware-Grundausstattung, zum Beispiel ein Disketten¬ 
laufwerk, einen Joystick oder bestimmte Druckertypen. 
Informieren Sie sich daher bitte vor der Kaufentscheidung, 
ob das für Sie interessante Programm mit Ihrer 
Hardware-Konfiguration ohne Probleme läuft. Dazu ent¬ 
nehmen Sie bitte aus der Tabelle die Ausgabe der 64’er, in 
der diese Programme getestet wurden, sowie die Anschrift 
der Anbieter dieser Produkte, über die Sie nähere Informa¬ 
tionen beziehen können. 

Einige der hier aufgeführten Programme werden wir in 
der Ausgabe 8/87 nochmal ausführlicher vorstellen. So 
können Sie sich ein klares Bild darüber machen, was die 
Programme im praktischen Einsatz leisten. 

An anderer Stelle in diesem Heft finden Sie auch eine 
Aufstellung der 64’er Top-Listings zum Abtippen. In vielen 
Fällen können Sie mit diesen Programmen vergleichbare 
Ergebnisse erzielen. Beachten Sie also auch diese interes¬ 
sante Zusammenstellung. 



Vizawrite 64 


Textverarbeitung 


»Vizawrite« 64 zeichnet sich vor allem durch eine hohe 
Geschwindigkeit, einen großen Textspeicher (34 KByte) 
und komfortable Editier- und Formatierungsfunktionen 
aus. Da mit einem Trick eigene Programmerweiterungen 
nachgeladen werden können, ist Vizawrite 64 in vielen 
Punkten eigenen Bedürfnissen anpaßbar. Eine bisher 
14teilige Serie »Tips&Tricks zu Vizawrite 64« finden Sie in 
loser Folge seit Ausgabe 12/85. Zum Beispiel einen nach¬ 
ladbaren Taschenrechner (4/87) und eine Erweiterung, die 
es erlaubt, Text und Grafik in Briefqualität auf einem Matrix¬ 
drucker auszugeben (Listing des Monats 6/87). 


@ 332 . 
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SOFTWARE 




Startexter 64 


Stardatei 64 


Textverarbeitung II 


Dateiverwnltung 


Nicht nur wegen des günstigen Preises gehört »Startexter 
64«zu den verbreitetsten Programmen bei unseren Lesern. 
Startexter erlaubt es ohne weiteres, auf problematischen 
Druckern Umlaute auszugeben. Einer der größten Vorteile 
von Startexter 64 ist der 80-Zeichen-Modus. Hier kann der 
Text in der Form betrachtet werden, wie er später auf dem 
Papier ausgegeben wird. Startexter verarbeitet auch Trenn¬ 
vorschläge, die dafür sorgen, daß beim Blocksatz keine 
großen Lücken zwischen den Wörtern einer Zeile entste¬ 
hen. Mit dem mitgelieferten Editor können Bildschirm- und 
Drucker-Zeichensätze entworfen werden. 


Für viele Anwendungen im Bereich Dateiverwaltung ist es 
ausreichend, mit »elektronischen Karteikarten« zu arbei¬ 
ten. »Stardatei 64« ist ausgesprochen einfach zu bedienen, 
da es letztlich in der Handhabung einer konventionellen 
Kartei entspricht. Es gibt hier ebenfalls Karteikarten-Reiter, 
nach denen besonders schnell gesucht werden kann. Der 
Inhalt einer bestimmten Karteikarte kann so schnell und 
einfach eingesehen und ausgegeben werden. Interessant 
ist sicherlich auch die Schnittstelle zu Startexter 64, die es 
erlaubt, gefundene Datensätze in das Textverarbeitungs- 
prtkJISram zu übertragen. 


üiiLIik j a * D \ ;< . m T* i :h . 1 > 1 x 10 rjTJjFtjBRS 

Kundennr 


<01201011 

> 

Hane 


Oestnann, 

Herwann > 

Tele fon 


<089- 471928 > 

Strasse 

Hohnort 

Kreis 


<6erghoferstr. 12 > 

<8000 huenchen 80 > 

< > 

Krediti »Mit 


< 7000.00> 

Datu« d. 

letzten Rechnung 

<12fiPR87> 

DatuH d. 

letzten Zahlung 

<120PR87> 

Kontostand 


< 0.00> 


Superbase 64 



Datenbank-System 


Tabellenkalkulation 


Das wohl einzige Programm für den C64, das zu Recht den 
Namen Datenbank trägt, ist »Superbase 64«. Neben einer 
komfortablen menügesteuerten Datenverarbeitung ist es 
mit diesem Programm auch möglich, Datensätze mit Hilfe 
einer eigenen Datenbank-Programmiersprache zu mani¬ 
pulieren. So ist Superbase 64 gleichermaßen für den 
Anfänger und den Profi geeignet. Da auch komplexe 
Berechnungen durchgeführt werden können, ist Super¬ 
base 64 für nahezu jedes Problem einsetzbar - von der ein¬ 
fachen Adressenverwaltung bis hin zur Lager- und Finanz¬ 
buchhaltung. 


Im professionellen Einsatz des C64 spielt auch die Tabel¬ 
lenkalkulation eine wichtige Rolle. »Vizastar 64« stellt alle 
wichtigen mathematischen Funktionen für ein professio¬ 
nelles Arbeiten zur Verfügung. Mit der eigenen Program¬ 
miersprache können Eingaben und Berechnungen sowohl 
menü- als auch programmgesteuert durchgeführt werden. 
Integriert ist auch eine Datenbank, mit der Daten jeder Art 
verwaltet und in die Tabellenkalkulation übertragen werden 
können. Ergebnisse können auch grafisch dargestellt und 
auf vielen Druckern ausgegeben werden. Eine Schnitt¬ 
stelle zu Vizawrite 64 ist vorhanden. 
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SOFTWARE 


C64 



Hi-Eddi Plus 



Printfox 


Grafik/Konstruktion 


»Hi-Eddi Plus«, die erweiterte und verbesserte Version des 
64’er-Programms, arbeitet mit bis zu sieben Bildschirmen 
in der höchstmöglichen Auflösung des C64 (320 x 200 Bild¬ 
punkte) bei maximal vier Farben. Über den integrierten 
Sprite-Editor kann jeder Bildpunkt exakt angesprochen 
werden. Bilder vieler Zeichen- und Malprogramme sowie 
Zeichensätze und Sprites können geladen und weiterverar¬ 
beitet werden. Alle wichtigen Zeichenbefehle und eine 
schnelle Trickfilm-Routine sind vorhanden. Darüber hinaus 
können mit Hi-Eddi Plus auch Spraydosen-Effekte erzielt 
und Beschriftungen vorgenommen werden. 


Desk-Top-Publishing 


Wer mehrspaltige Texte in verschiedenen Schriftarten und 
-großen mit Grafik kombiniert verarbeiten möchte, ist mit 
dem »Printfox« gut beraten. Dieses Programm enthält ein 
leistungsfähiges Textverarbeitungsprogramm, das Viza- 
write 64 nachempfunden ist, und einen Grafikeditor, der 
stark an Hi-Eddi erinnert. Durch diese gelungene Kombina¬ 
tion ist Printfox zum Gestalten von Schüler- und Vereinszei¬ 
tungen oder auch für kürzere Briefe optimal geeignet. 
Zusatzprogramme zum Entwerfen neuer Zeichensätze 
sowie weitere Grafikdisketten zum Einbinden in die Texte 
machen das Programm noch interessanter. 



Grafik/Konstruktion II 


Drucker-Software 


Im Gegensatz zu vielen anderen Zeichen- und Konstruk¬ 
tionsprogrammen arbeitet »Starpainter 64« im DIN- 
A4-Format. Das heißt, daß letztlich eine Grafik auf einem 
Drucker ausgegeben werden kann, die die gesamte Fläche 
einer Seite ausnutzt. Während des Zeichnens sieht man 
selbstverständlich nur einen Teil des gesamten Bildes, 
allerdings kann man sich jederzeit das Gesamtbild in stark 
verkleinertem Maßstab anzeigen lassen. Viele verschie¬ 
dene »Pinsel« und Füllmuster stehen für die Arbeit mit Star¬ 
painter zur Verfügung. Für kompliziertere Konstruktionen 
kann ein »Lineal« als Maßstab eingeblendet werden. 


Auf den schnellen Entwurf und Druck von Gruß- und Glück¬ 
wunschkarten, Schildern (DIN A4), Briefköpfen, Kalender¬ 
blättern und meterlangen Transparenten ist der »Print- 
Shop« spezialisiert. Für den Text stehen acht verschiedene 
Proportionalschrift-Zeichensätze zur Verfügung, die 
gefüllt, umrandet und im 3D-Effekt verwendet werden kön¬ 
nen. Die Bilder können mit einem von acht verschiedenen 
Rahmenmuster umrandet werden und mit einem der 60 
mitgelieferten oder auch selbstentworfenen kleinen Bil¬ 
dern versehen werden. Als Hintergund können auch belie¬ 
bige Grafikbilder eingebunden werden. 
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SOFTWARE 


C64 



<C> 1984 DAT ft BECKER, THOMAS HELBIG 


LI = COMP1LER/OPT I Ml ZER 1 

W = COMPILER/OPTIMIZER II 

1?: = ADUAHCED DEUELOPMEHT PACKAGE 

£ = OUERLAV 

PROGRAMHAME? UOKABELTRAI HER 


Basic 64 


Seque 


81 Part 1 Events Free 10686 











H 

lyTl DyniT)?! Trnpo .Bll length 
pMjtjMf .Vn£ .J Stacc i ■ . 

■■TJE 53 «, 120 • L > 4 

CoHnand f3,4-Value f5,6=Box f?=Exit 


Sound Expander 


Bosic-Compiler 


Musik 


Wer viel in Basic arbeitet, aber nicht auf die Geschwindig¬ 
keit maschinennaher Programmierung verzichten möchte, 
benötigt einen guten Compiler. Der schnellste und vielsei¬ 
tigste CompilerfürdenC64 ist »Basic 64«. Das interessante 
an Basic 64 Ist die Funktion, bei der Baslc-Befehle In echte 
Maschinensprache übersetzt werden (M-Code). Wahl¬ 
weise kann auch der platzsparende P-Code eingestellt wer¬ 
den, der jedoch etwas langsamer abgearbeitet wird. Auch 
das Mischen der beiden Codes ist möglich. Das Compilat 
kann frei im Speicher verschoben werden, was in vielen 
Fällen nützlich ist. r . v - n m 


Wer mehr als die drei Stimmen des C64 zur Musikprogram¬ 
mierung benötigt, kann mit dem »Sound-Expander« bis zu 
neunstimmig polyphon spielen. Spezielle Software zur 
Musik- und Sound-Editierung (Bild) und -Programmierung 
sowie ein professionelles Keyboard können zusätzlich ein¬ 
zeln erworben werden. Herz des Sound-Expanders, der in 
den Expansions-Port des C64 gesteckt wird, ist ein Yamaha- 
Sound-Chip, der den C64 zum professionellen Synthesizer 
macht. Das Besondere am eingebauten Sound-Chip ist der 
besonders klare Klang (FM-Sound) mit dem Unglaubliches 
aus dom C64 heraugeholt werden kann. 



ASSI/M 



VIP-Terminal 


Assembler 


DFÜ/Terminalprogramme 


Für die Programmierung in Maschinensprache ist ein 
Assembler notwendig. »ASSI/M« ist ein Paket, bestehend 
aus Full-Screen-Editor (FSE), Monitor (DEMON) und 
Assembler (ASM). Der Editor benötigt keine Zeilennume¬ 
rierung und erlaubt Blockstrukturierungen durch Ein¬ 
rückung. Ähnlich wie bei einem Textverarbeitungspro¬ 
gramm gibt es leistungsfähige Befehle zur Bearbeitung. 
Der Assembler ist besonders schnell und verarbeitet 
Makros, so daß Makrobibliotheken angelegt werden kön¬ 
nen (zwei werden mitgeliefert). Besonders leistungsfähig 
und vielseitig ist auch der Maschinensprache-Monitor. 


Wer über einen Akkustikkoppler oder Modem verfügt, kann 
über »VIP-Term« mit anderen Computern, Mailboxen und 
Datenbanken in einer Darstellung von 40, 80 oder 106 Zei¬ 
chen/Zeile kommunizieren. Als einziges bekanntes Pro¬ 
gramm bietet VIP-Term für den C64 lauffähige 
VT-52-Terminal-Emulation, die Sie in vielen professionel¬ 
len Mailboxen benötigen, sowie eine Übertragung mit 1200 
Baud, 8 Datenbits, keiner Parität und 1 Stoppbit 
(1200/8/n/1). VIP-Term besitzt weiterhin als nützliche Funk¬ 
tion ein X-Modem-Übertragungsprotokoll, so daß auch Pro¬ 
grammdateien per Telefon übertragen werden können. 
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C64 


SOFTWARE 


Die »Stars« der 64'er 


Viele Programme, die im 64’er-Magazin oder den 
Sonderheften veröffentlicht wurden, entwickel¬ 
ten sich zu wahren Standardprogrammen für den 
C64. Wir stellen Ihnen eine kleine Auswahl unse¬ 
rer »Hits« vor, die in keiner Software-Bibliothek 
fehlen sollten. 

iele Spitzenprogramme wurden im 64’er-Magazin 
schon als »Listing des Monats« oder »Anwendung des 
Monats« veröffentlicht. Doch auch unter den weniger 
spektakulären Programmen waren viele aus den unter¬ 
schiedlichsten Richtungen, die so manchem professionel¬ 
len und teuren Produkt mühelos das Wasser reichen kön¬ 
nen oder es gar übertreffen. 

Wir wollen nun in diesem Bericht die »Sternstunden« des 
64’er-Magazins noch einmal Revue passieren lassen, um 
Ihnen zu zeigen, zu welchen Leistungen unsere Listings 
imstande sind. Wenden wir uns zunächst den Programmen 
zu, die dem Umgang mit dem Floppylaufwerk dienen: 

Die Floppy 1541 ist als Speichermedium den meisten 
C64-Anwendern bekannt und wird neben der Datasette am 
häufigsten zur Speicherung von Programmen und anderen 
Daten verwendet. Doch im Vergleich zu den Diskettensta¬ 
tionen anderer Computersysteme ist das Floppylaufwerk 
des C64 sehr langsam. Dies macht sich besonders beim 
Laden längerer Programme bemerkbar. Aus diesem Grund 
entstand »Hypra-Load« - ein kleines Programm von etwa 
1500 Byte Länge, das den Ladevorgang der Floppy 1541 
etwa um den Faktor 5 beschleunigt. Als erster Floppy- 
Speeder seiner Art wurde »Hypra-Load« auch sofort als 
Listing des Monats in der Ausgabe 10/84 des 64’er- 
Magazins vorgestellt. »Hypra-Load« war eine kleine Sensa¬ 
tion und der Auslöser für viele weitere Hypra-Projekte. 

Kurze Zeit später folgte in Ausgabe 4/85 ein Listing, mit 
dem man die schnelle Lade-Routine per Austausch eines 
EPROMs in das Betriebssystem des C64 einbauen konnte, 
denn Hypra-Load mußte vor seinem Einsatz stets neu gela¬ 
den werden. Befinden sich die nötigen Programmteile 
schon im Betriebssystem des Computers, steht es bereits 
nach dem Einschalten des C64 zur Verfügung und kann 
sofort seine vollen Geschwindigkeitsvorteile entfalten. Das 
»neue« Betriebssystem kam in Ausgabe 4/85 zu Veröffentli¬ 
chung. Es bekam zu Ehren seines Vorgängers den Namen 
»Hypra-Perfekt«. 

Die »Hypra-Welle« 


Doch warum sollte man Programme nicht auch 5mal 
schneller speichern können? Als Ergänzung zu Hypra- 
Load wurde deshalb »Hypra-Save« veröffentlicht, mit des¬ 
sen Hilfe der Speichervorgang um den Faktor 5 beschleu¬ 
nigt wird. Es wurde in der Ausgabe 8/85 abgedruckt. 

Neueren Datums ist dagegen das dritte Programm im 
»Hypra«-Bunde mit dem Namen »Hypra-Fgrmat«. Es wurde 
erst kürzlich in Sonderheft 15 des 64'er-Mägazins unter der 
Rubrik »Tips & Tricks« veröffentlicht. Jede neue Diskette 
muß formatiert werden, bevor man Daten darauf speichern 
kann. Im Originalzustand benötigt die Floppy 1541 jedoch 
etwa 90 Sekunden für diese wichtige Prozedur. Doch 
Hypra-Format nimmt diese Arbeit in nur 15 (fünfzehn) 
Sekunden vor. Hypra-Format unterdrückt auch das 
Anschlägen des Schreib-Lese-Kopfes, das man beim 


Beginn des Formatierens als lautes Rattern hören kann. 
Außerdem übertrifft Hypra-Format beim Formatieren selbst 
die teuersten Floppy-Speeder in der Geschwindigkeit! 

Alle Programme der Hypra-Serie funktionieren auch mit 
der neuen Floppy 1541c, es treten keine Kompatibilitäts- 
Schwierigkeiten auf. 

EXOS V3 - Es geht noch schneller 


Mit Hypra-Load, dachte man, war die Grenze des technisch 
Machbaren erreicht, wenn man ohne Hardware-Zusätze 
auskommen will. Doch Ende 1986 wurde man eines Besse¬ 
ren belehrt. Ein neues Betriebssystem für den C64 mit dem 
Namen »EXOS V3«, das, auf EPROM gebrannt, gegen das 
alte ausgetauscht wird, enthält einen Schnellader, der es 
erlaubt, Programme bis zu 14mal schneller zu laden. Das 
Listing des Monats für die Ausgabe 12/86 stand somit fest. 

Neben den schnellen Laderoutinen bietet EXOS V3 
jedoch weitere Besonderheiten. Zusätzlich unterhält EXOS 
V3 eine RAM-Floppy und verfügt über viele weitere Befehle 
und Kommandos, die die Arbeit mit dem Bildschirmeditor 
des C64 erleichtern sollen. Hinzu kommen die Möglichkei¬ 
ten zur Anzeige des Disketten-Directorys und des Floppy- 
Fehlerkanals. 

Sollte das Laden mit EXOS V3 einmal Probleme berei¬ 
ten, kann das Betriebssystem stufenweise bis zum 
ursprünglichen Original des C64 zurückgeschaltet wer¬ 
den, daß keine Kompatibilitätsprobleme auftreten kön¬ 
nen. 

Rekord beim Kopieren 


Häufig steht man vor dem Problem, eine ganze Diskette 
duplizieren zu müssen. Doch oft mangelt es an einem ent¬ 
sprechenden Programm oder, wenn vorhanden, arbeitet es 
nervenaufreibend langsam. »Master-Copy«, das Listing 
des Monats in der Ausgabe 5/87 des 64’er-Magazins, stellt 
bei den reinen Software-Lösungen einen neuen Rekord in 
bezug auf Kopiergeschwindigkeit auf. Es kopiert eine voll¬ 
ständige Diskette in nur IV 2 Minuten. Anders als bei 
»Copy+«, dem Listing des Monats in Ausgabe 3/87, legte 
der Autor von Master-Copy Wert auf das schnelle Kopieren 
ungeschützter oder einwandfreier Disketten. Fehler auf 
einzelnen Spuren oder Sektoren werden zwar erkannt und 
dem Anwender mitgeteilt, jedoch nicht auf die Zieldiskette 
übertragen. Selbstverständlich verfügt Master-Copy auch 
überein bedienerfreundliches Menü. Darüber lassen sich 
Floppy-Kommandos senden und das Directory anzeigen. 
Weitere Menüpunkte erlauben das genaue Einstellen der 
Start- und Endspur und der Geräteadresse der betreffen¬ 
den Floppystation. Somit können auch Diskettenlaufwerke 
der Nummern 9,10 oder 11 problemlos angesprochen wer¬ 
den. 

Master-Copy kopiert je nach angegebenem Bereich von 
nur einer bis zu 40 Spuren einer Diskette, und das in einer 
sagenhaften Zeit. 

Master-Copy ist in gewisser Weise eine gute Ergänzung 
zu Copy+. Sollen Disketten schnell und einfach dupliziert 
werden, verwendet man am besten Master-Copy. Manipu¬ 
lierte oder fehlerhafte Disketten sind dagegen mit Copy+ 
zu kopieren. So hat der Anwender mit beiden Programmen 
für alle Fälle ein gutes Kopierprogramm zur Hand. Ein 
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Bild 1. Das Hauptmenü des »Disc-Wizard« 

Nachteil von Copy+ soll nicht verschwiegen werden: Es 
arbeitet nicht mit der Floppy 1541c zusammen. 

Weniger Geschwindigkeit und gutes Timing, als Komfort 
im Diskettenbetrieb lag dem Autor des »Disc-Wizard« am 
Herzen. Sein Programm ist in bezug auf Diskettenbehand¬ 
lung wahrlich ein Zauberer. Aus diesem Grund wurde es 
auch in der Ausgabe 5/86 des 64’er-Magazins das Listing 
des Monats. Es ist unter anderem auch in Sonderheft 15 
(Thema: »Floppy und Datasette«) zu finden. 


Der Zauberer für die Floppy 1541 


Mit dem Disc-Wizard hält man kein gewöhnliches Utility- 
Programm in den Händen, sondern hat die Wahl zwischen 
vielen ungewöhnlichen, aber wertvollen Möglichkeiten zur 
Manipulation von Disketten. So lassen sich auf einfache 
Weise der Name und die ID einer Diskette auch ohne eine 
Neuformatierung ändern oder ganze Disketten gegen 
Schreibzugriffe schützen. Sollen nur einzelne Dateien vor 
dem Überschreiben geschützt werden, kann auch dies mit 
Disc-Wizard problemlos und einfach über ein komfortables 
Menü (Bild 1) vorgenommen werden. 

Haben Sie eine Diskette irrtümlich kurz formatiert (Flop- 
pybefehl N ohne ID-Angabe), obwohl Sie die darauf gespei¬ 
cherten Programme noch benötigt hätten? In einem sol¬ 
chen, bisher aussichtslosen Fall hilft Disc-Wizard mit 
einem hervorragenden Befehl, die angeblich gelöschten 
Dateien wieder zu rekonstruieren. Dies ist jedoch keine 
Zauberei, denn bei der Kurz-Formatierung wird lediglich 
das Inhaltsverzeichnis einer Diskette gelöscht; die rest¬ 
lichen Daten bleiben erhalten. Bei mit Angabe der ID forma¬ 
tierten Disketten hat diese Methode keinen Erfolg, da dabei 
sämtliche Daten vollständig überschrieben werden. 

Besonders im Zusammenhang mit dem Directory leistet 
der Disc-Wizard Ungewöhnliches. Nahezu alle dort ver- 
zeichneten Parameter lassen sich beliebig ändern, mani¬ 
pulieren und verdrehen, wie beispielsweise der Name, der 
Typ oder die Längenangabe einer Datei. Mit der Anweisung 
»DIR-SORTER« können sogar Dateien im Directory sor¬ 
tiert, eingefügt oder gelöscht werden. 

Des weiteren ist im Disc-Wizard ein umfangreicher 
Disketten-Monitor implementiert, der so manches Produkt 
in den Schatten stellt. Hier können die einzelnen Sektoren 
einer Diskette nach Belieben geändert werden. Eine 
besondere Fähigkeit dieses Programms besteht darin, die 
Daten eines Blocks auf der Diskette nach, wenn es sein 
muß auch verschlüsselten, Texten zu durchsuchen, um 
eventuell codierte Daten aufzuspüren. Natürlich können 


die Daten nach Herzenslust selbst codiert werden, so daß 
sie für Unbefugte nicht lesbar sind. 

Disc-Wizard ist ein Programm, das in der Software- 
Sammlung eines Floppy-Fans nicht fehlen sollte. 

Wie Sie bisher sehen konnten, haben wir uns beim 64’er- 
Magazin über das Thema Disketten und Floppystation sehr 
viele Gedanken gemacht. Doch auch in anderen Bereichen 
wurden sehr gute Listings veröffentlicht. 

Grafisch Up-to-Date 


Gleich zu Beginn des Jahres 1985, in der Ausgabe 1/85, 
sorgte ein fantastisches Listing des Monats für Furore. Sein 
Name ist »Hi-Eddi«, der als Abkürzung für »High 
Resolution-Graphics-Editor« steht. Es ist ein professionel¬ 
les Zeichen- und Malprogramm für den C64, das sich hinter 
kommerzieller Software nicht verstecken muß. Hans 
Haberl, der Autor von Hi-Eddi wollte ursprünglich nur chine¬ 
sische Zeichen auf dem C64 darstellen. Dann erweiterte er 
seinen Editor aber schließlich zu einem perfekten Grafik¬ 
programm mit Menüsteuerung (Bild 2), das mit einer Viel¬ 
zahl von Kommandos Möglichkeiten eröffnet, die man bei 
so manchem Grafikeditor vermißt. Befehle zum Zeichnen 
von Linien, Rechtecken und Kreisen sind für Hi-Eddi 
genauso selbstverständlich wie das Ausfüllen beliebiger 
Flächen mit einer gewünschten Farbe oder das Bewegen 
von einzelnen Bildausschnitten. Einige Besonderheiten 
zeigen aber, daß es sich hier nicht um ein gewöhnliches 
Zeichenprogramm handelt. 



Bild 2. Das Menü von »Hi-Eddi«. Alle Funktionen können 
per Joystick angewählt werden 


So besitzt Hi-Eddi bis zu sieben unabhängige Grafikbild¬ 
schirme (Grafikseiten), zwischen denen wahlweise umge¬ 
schaltet werden kann. Der Computergrafiker verfügt damit 
über eine außerordentlich große Arbeitsfläche zur Erstel¬ 
lung seiner Werke. Natürlich können einzelne Grafikab¬ 
schnitte zwischen diesen Bildschirmen beliebig kopiert 
werden. Selbst ganze Grafikseiten dürfen in ein anderes 
Bild übertragen werden. Hi-Eddi kann dabei auf Wunsch 
eine Grafik wie eine Folie auf eine andere legen, so daß 
diese nach bestimmten Vorschriften vereinigt und kombi¬ 
niert werden. Der Anwender hat somit die Möglichkeit, Teile 
seines Bildes - zum Beispiel Hintergrund und Vordergrund 
- getrennt zu entwerfen, um sie schließlich zu einem 
Gesamtbild zusammenzufügen. 

Doch Hi-Eddi ist nicht nur ein komfortables Zeichenpro¬ 
gramm. Es ist vielmehr auch ein perfekter Sprite-Editor, der 
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das Gestalten von Sprites - dies sind frei bewegliche 
Grafikobjekte, wie man sie von Spielen her kennt - zum Kin¬ 
derspiel macht. Im Vergrößerungsmodus kann ein Sprite 
Punkt für Punkt eingegeben werden. Ein Sprite läßt sich 
aber auch jederzeit aus einem Grafikbild herauskopieren, 
um es dann weiter zu verarbeiten. Drehen, Spiegeln und 
Wenden eines Sprites sind dabei für Hi-Eddi keine Schwie¬ 
rigkeit. Nach der Bearbeitung kann es schließlich wieder in 
das Grafikbild eingesetzt oder auf Diskette gespeichert 
werden. Auf diese Weise können sogenannte Construc- 
tion-Sets erstellt werden. Ein solches Set besteht aus ver¬ 
schiedensten Bildern eines Themas, wie zum Beispiel den 
Schaltsymbolen integrierter Bausteine. Durch Heraus¬ 
greifen der einzelnen Teile mit der Spritefunktion lassen 
sich dann die gewünschten Bilder konstruieren. 

Animierte Grafik mit Hi-Eddi 


Eine besondere Fähigkeit von Hi-Eddi ist eine Zeichen¬ 
trick-Funktion, die es erlaubt, eine kleine Zeichentrickse¬ 
quenz zu erstellen und diese ablaufen zu lassen. Dazu wer¬ 
den bis zu sechs Bildschirme in jeweils vier Teilbereiche 
aufgespalten, in denen sich je eine Phase der Bewegung 
befindet. Ein Tastendruck genügt, und Hi-Eddi »blättert« die 
Einzelbilder wie einen Film durch. Bis zu 24 Bilder können 
einen solchen Bewegungsablauf darstellen. 

Alle diese Funktionen lassen sich über die Tastatur errei¬ 
chen. Wer allerdings gerne mit einem Menü arbeiten will, 
mit dem er die einzelnen Punkte per Joystick aktivieren 
kann, der darf sich eines nach persönlichen Vorstellungen 
kreieren. Oder man greift einfach auf das schon vorhan¬ 
dene Menü zurück. 

Der Autor von Hi-Eddi legte großen Wert auf Flexibilität 
und Zusammenarbeit mit anderen Zeichenprogrammen. 
Aus diesem Grund lassen sich auch Grafikbilder laden, die 
von anderen Programmen stammen, wie zum Beispiel 
Koala-Painter oder Paint-Magic. 

Aufgrund der hervorragenden Fähigkeiten von Hi-Eddi 
erweiterte und vervollkommnete Hans Haberl sein Pro¬ 
gramm, das heute unter dem Namen »Hi-Eddi Plus« in Ver¬ 
bindung mit einem umfangreichen Buch vom Markt & Tech¬ 
nik Software-Verlag mit großem Erfolg vertrieben wird. Ein 
»einfaches« Leser-Listing wurde somit zu einem professio¬ 
nellen Programm. Ein ähnlicher Aufstieg widerfuhr auch 
einem anderen sagenhaften Programm zum Thema Gra¬ 
fik, das zunächst als Leser-Listing begann. 

Giga-CAD - einfach gigantisch 


Ein Grafikprogramm zum Erstellen von dreidimensionalen 
Objekten (»CAD« oder »Computer Aided Design«) mit ver¬ 
deckten Linien, Schattierungen und Fluchtpunktdarstel¬ 
lung entwerfen? 

Unmöglich! Dies war die vorherrschende Meinung, auch 
in Kreisen von Fachleuten, bis wir schließlich ein Pro¬ 
gramm in den Händen hielten, das den vielversprechenden 
Namen »GIGA-CAD« trug. Die Erwartungen waren groß, 
ebenso die Begeisterung, als man das Programm in Aktion 
sah. Es war tatsächlich ein CAD-Programm für den C64 
zum Konstruieren beliebiger dreidimensionaler Körper, die 
sich in alle erdenkliche Richtungen drehen und verändern 
ließen. Selbst die Darstellung mit verdeckten Linien und 
Schattierung fehlte nicht. Doch wurde Giga-CAD wegen 
seines großen Umfangs nicht Listing des Monats. 

Es fand im Grafik-Sonderheft 6/86 seinen gebührenden 
Platz, wo Giga-CAD zusammen mit einer umfangreichen 
Anleitung veröffentlicht wurde. 


Dank einer bedienerfreundlichen Menüsteuerung wird 
das Entwickeln von dreidimensoinalen Körpern mit Giga- 
CAD zum Vergnügen. Der gesamte Konstruktionsvorgang 
kann theoretisch mit dem Joystick erfolgen. Gewisse Spe¬ 
zialfunktionen sind jedoch nur über die Tastatur erreichbar, 
sowie auch die Auswahl bestimmter Optionen in diversen 
Untermenüs. 



Bild 3. »Giga-CAD« in Aktion: der Editor 


Das Erstaunliche an diesem CAD-Programm ist, daß der 
Körper während der Konstruktion in drei verschiedenen 
Ansichten (Projektionsebenen) auf dem Bildschirm sicht¬ 
bar ist (Bild 3). Man kann sein Werk also stets von mehreren 
Seiten betrachten. 

Ein Objekt bei Giga-CAD besteht aus verschiedenen 
Fläch»' , die einzeln entworfen werden. Nachdem man die 
Fläche in die richtige Lage gedreht hat, kann man sie 
schließlich an den Gesamtkörper anfügen. Damit sind 
beliebige unregelmäßige Objekte denkbar. Symmetrische 
Gegenstände lassen sich jedoch am einfachsten durch 
Rotation erzeugen. Hier wird ein Linienzug um eine Achse 
rotiert und bildet somit einen vollständigen Körper, wie Sie 
in Bild 4 sehen können. Daneben lassen sich auch synch¬ 
ron in allen drei Projektionsebenen direkt Veränderungen 
anbringen. 

Hat man sein Objekt schließlich entworfen, kann man 
dessen Darstellungsweise ändern, denn noch ist es ein 
durchsichtiges Strichgerüst. In speziellen Menüs können 
die Modi zum Zeichnen mit versteckten Linien oder Schat¬ 
tierungen gewählt werden. Daneben ist auch die Flucht¬ 
punktdarstellung möglich, wobei sich der Fluchtpunkt nach 
eigenem Ermessen festlegen läßt. Selbst die Position der 
Lichtquelle bei der schattierten Darstellung kann frei 
bestimmt werden. 

Anschließend wird das Objekt je nach eingestelltem 
Modus (fast alle sind kombinierbar) auf den Bildschirm 
gezeichnet (Bild 4). Besitzt man einen Drucker, kann die 
entstandene Grafik auf Papier gebannt werden. Giga-CAD 
bietet hier aber eine sensationelle Besonderheit. Neben 
der einfachen Auflösung (320 mal 200 Punkte), wie sie 
auch auf dem Bildschirm des C64 möglich ist, können die 
dreidimensionalen Körper auch in vierfacher (640 mal 400 
Punkte) oder zehnfacher (1000 mal 640 Punkte!) Auflösung 
und Größe berechnet und ausgedruckt werden (Bild 5). 
Eine gedruckte Grafik in zehnfacher Auflösung entspricht 
dabei einer tatsächlichen Größe eines Bogens Papier im 
DIN-A3-Format. Der Ausdruck erfolgt aber in Einzelteilen 
auf DIN-A4-Blättern, die man anschließend miteinander 
verkleben muß. 

Besitzt man keinen Drucker, hält Giga-CAD eine weitere 
Freude bereit. Aus jedem beliebigen Objekt kann nämlich 
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ein Film mit insgesamt 24 Bildern erzeugt werden. Giga- 
CAD berechnet dabei die Ansichtsphasen des sich drehen¬ 
den Körpers. 

Mit Hilfe eines unabängigen Programms werden die ein¬ 
zelnen Phasenbilder von Diskette geladen und schließlich 
zu einem Film zusammengefügt. Giga-CAD bietet hier 
unbegrenzte Möglichkeiten. 



Bild 4. Der Giga-CAD-Schriftzug als perspektivische 
Konstruktion mit Schattierung auf dem Bildschirm 

Wie Hi-Eddi wird Giga-CAD heute in einer optimierten 
(schnelleren) und erweiterten Fassung unter dem Namen 
»Giga-CAD Plus« zusammen mit einem umfangreichen 
Buch von Markt & Technik angeboten. Das Buch enthält 
dabei nützliche Tricks und Tips für die Arbeit mit Giga-CAD 
Plus und beschreibt zusätzlich die neuen Funktionen die¬ 
ses hervorragenden Programms. 

Aber nicht nur auf den Gebieten Floppystation und Grafik 
wurde Fantastisches geleistet. Auch Computer-Fans, die 
nach guten Anwender- und Hilfsprogrammen suchten, 
konnten in den letzten drei Jahren im 64’er-Magazin fündig 
werden. Besonders für passionierte Freunde der Maschi¬ 
nensprache sind zwei Leser-Listings des 64’er-Magazins 
von größter Bedeutung. 

SMON - Monitor der Superklosse 


Wie oft schon hat man einen eingebauten Maschinen¬ 
sprachemonitor im C64 vermißt, mit dem man zumindest 
Maschinenprogramme laden und speichern kann. Die 
64’er-Redaktion war sich dieses Mangels bewußt und ver¬ 
öffentlichte ab Ausgabe 11/84 Schritt für Schritt, ähnlich 
einem Baukastensystem, den mittlerweile klassisch zu 
nennenden Monitor »SMON«. Mit dem Erwerb des 64’er- 
Magazins, Ausgabe 4/85, hatte man schließlich einen kom¬ 
pletten Monitor zur Verfügung, der sich weit über den 
»Standard« erhob. 

Selbstverständlich besitzt der SMON alle Kommandos, 
die zu einem anständigen Monitor gehören, wie das hexa¬ 
dezimale Auflisten von Speicherbereichen (Memory- 
Dump), das Laden und Speichern von bestimmten Spei¬ 
cherbereichen, ein Mini-Assembler und ein Disassembler. 
Der eingebaute Assembler erlaubt zusätzlich die Verwen¬ 
dung von Labels bei der Programmierung in Maschinen¬ 
sprache. Doch schon bei den Befehlen zum Verschieben 
von Speicherbereichen zeigt SMON seine Fähigkeiten. 
Neben dem normalen Verschieben kann mittels eines 
Befehls gleichzeitig ein Angleich von direkten Sprüngen 
und Adreßzugriffen an den neuen Bereich erfolgen. 


Außergewöhnlich interessant ist auch die Vielzahl an 
Suchroutinen, die das Durchstöbern des Speichers nach 
verschiedensten Daten erlauben. So kann man nach 
Maschinenbefehlen suchen, die entweder einen absoluten 
oder gar einen relativen Operanden haben. Selbst Befehle, 
die auf Zero-Page-Adressen zugreifen und unmittelbare 
Adressierung werden von SMON problemlos gefunden. 
Doch SMON kann auch nach Tabellen suchen. Alle Werte, 
die nicht als Maschinencode zu identifizieren sind, werden 
als Tabelle ausgewiesen. 

Eine Funktion ist bei der Analyse von Maschinenpro¬ 
grammen besonders wichtig: der Trace-Modus. Hier wird 
ein Maschinenprogramm schrittweise abgearbeitet, so daß 
der Programmmierer Veränderungen in den Prozessor- 
Registern und im Speicher wahrnehmen kann, um den 
eventuellen Grund eines Absturzes zu lokalisieren. Anders 
als in Basic helfen dem Anwender in Masachinensprache 
keine Fehlermeldungen, um unkorrekte Programmteile zu 
erkennen. Ein Fehler hat hier meist einen Absturz zur 
Folge. SMON besitzt aus diesem Grund die unterschied¬ 
lichsten Trace-Kommandos. 

SMON ist auch Disketten-Monitor 


Ohne Absicht betätigen Sie die Taste <Z>, während Sie 
mit SMON arbeiten. Plötzlich verfärbt sich der Rahmen auf 
dem Bildschirm, und sämtliche Kommandos, die zuvor 
noch hervorragend funktionierten, werden nun von SMON 
nicht mehr akzeptiert. Man darf nun nicht glauben, SMON 
sei defekt oder abgestürzt. Der komfortable Monitor befin¬ 
det sich nur in einem anderen Modus. Auf Tastendruck ver¬ 
wandelt sich SMON in einen kleinen Disketten-Monitor, der 
das Bearbeiten von einzelnen Blöcken einer Diskette 
ermöglicht. Er ist natürlich bei weitem nicht so umfangreich 
wie etwa das Disketten-Utility Disc-Wizard, das wir schon 
vorgestellt haben. SMON beschränkt sich dabei lediglich 
auf das Lesen, Editieren und Zurückschreiben der Blöcke, 
leistet aber bei der Arbeit mit dem Floppylaufwerk in 
Maschinensprache wertvolle Hilfe. 

Obwohl SMON einen ungewöhnlich großen Befehlsvor¬ 
rat hat (wir konnten nur einen Teil anschneiden), ist das Pro¬ 
gramm selbst sehr kurz. Er benötigt nur etwa 4000 Byte des 
Speichers Ihres C64 und kann zudem durch einen eigenen 
Befehl frei verschoben werden, so daß der Monitor immer 
dort arbeitet, wo er bei der Programmierung in Maschinen¬ 
sprache nicht stört. 

Für die Erstellung eigener Maschinenprogramme besitzt 
SMON einen Assembler, der die direkte Eingabe von 
Assemblerbefehlen erlaubt und für kleine Programme 
durchaus ausreichend ist. Größere Maschinensprache- 
Projekte lassen sich mit ihm jedoch kaum realisieren, da 
man hier schnell die Übersicht verliert. Für eigene 
Maschinensprache-Werke sollte man deshalb lieber auf 
einen großen Assembler zurückgreifen. Besonders emp¬ 
fehlenswert ist dabei ein Leser-Listing aus der Ausgabe 
7/85 des 64’er-Magazins (und Sonderheft 8/85): 

Mit Hypra-Ass so einfach 
wie in Basic programmieren 


Sein Name ist »Hypra-Ass«. Er darf sich zu Recht einen 
Assembler der Spitzenklasse nennen, denn er überbietet 
so manchen teuren, käuflichen Assembler in bezug auf die 
Leistung um ein Vielfaches. 

Wer noch nie in Assembler gearbeitet hat, dem sollen an 
dieser Stelle einige Erläuterungen zur Maschinensprache 
gegeben werden: Maschinensprache ist die niederste und 
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zugleich die einzige Sprache, die ein Computer verstehen 
kann. Höhere Sprachen müssen deshalb zuvor in diese 
Maschinensprache übersetzt werden, was durch Interpre¬ 
ter (bei Basic) oder Compiler (zum Beispiel bei Pascal) 
erfolgt. Maschinensprache hat nun den Vorteil, extrem 
schnell zu arbeiten, die Programmierung ist jedoch auch 
recht umständlich und sehr fehleranfällig, da es beispiels¬ 
weise keine Variablen gibt. Alle Zugriffe müssen direkt auf 
Speicherstellen des Computers vorgenommen werden. 
Sprünge sind nur auf Adressen möglich und das Fehlen 
von Fehlermeldungen sind nur einige Aspekte, die das Pro¬ 
grammieren in Maschinensprache zur Qual werden las¬ 
sen. Um diesen Mängeln abzuhelfen, wurden Programme 
entwickelt, die das Arbeiten mit Maschinensprache erleich- 



Bild 5. Solche Grafiken können mit »Giga-CAD« auf einem 
Drucker ausgegeben werden 


des Programmes nur berücksichtigt werden, wenn entspre¬ 
chende Bedingungen erfüllt sind oder nicht. Maschinen¬ 
sprache-Experten wissen, daß es sich hierbei um »be¬ 
dingte Assemblierung« handelt. 

Für die Eingabe von Assemblerprogrammen hat Gerd Möll¬ 
mann, der Autor von Hypra-Ass, den Basic-Editor des C64 
übernommen und einige Modifikationen angebracht, die 
ihn noch wesentlich komfortabler gestalten. Die Program¬ 
mierung mit Hypra-Ass ist also ähnlich einfach wie das Ver¬ 
fassen von Basic-Programmen. Nach Start des Assem¬ 
blers meldet sich der Computer wieder mit dem üblichen 
»READY«. Hypra-Ass ist aber schon aktiv. Nun kann man 
sein Programm mit Zeilennummern eingeben. Alle Basic- 
Befehle sind dabei im Direkt-Modus noch verwendbar. 

Super Editor 


Tippt man nun RUN zum Programmstart, wird der eigent¬ 
liche Assembler aktiviert, der die Übersetzung des Pro¬ 
grammes in Maschinensprache vornimmt. Die Überset¬ 
zung (Assemblierung) geschieht in drei Durchgängen, 
deren Arbeitsgeschwindigkeit bemerkenswert hoch ist. 
Treten während der Assemblierung Ungereimtheiten auf, 
die Hypra-Ass nicht entziffern kann, gibt er eine seiner zahl¬ 
reichen Fehlermeldungen aus, die das Auffinden von Feh¬ 
lem erleichtern. 

Die beiden Programme SMON und Hypra-Ass stellen ein 
hervorragendes Programm-Gespann für den Assembler- 
Programmierer dar. Dies wurde noch einmal unterstrichen 
durch die gemeinsame Veröffentlichung beider Pro¬ 
gramme im Maschinensprache-Sonderheft 8/85, das auch 
den finsteiger leicht verständlich an die hohe Kunst der 
Assembler-Programmierung heranführt. 


tern: die Assembler. Große Assembler, sogenannte Makro- 
Assembler bieten dabei bereits sehr angenehme Erleichte¬ 
rungen. Hypra-Ass ist ein solcher Makro-Assembler, des¬ 
sen Eigenschaften allerding weit über die anderer Pro¬ 
gramme hinausgehen. 

Es lassen sich, wie in Basic, Variable definieren, die 
unterschiedliche Werte annehmen können. Was Hypra- 
Ass von anderen Assemblern unterscheidet, ist die Abgren¬ 
zung zwischen globalen und lokalen Variablen, die man 
eigentlich nur von strukturierten, höheren Programmier¬ 
sprachen gewöhnt ist. Diese Unterscheidung ist besonders 
bei einerweiteren Fähigkeit von Hypra-Ass von Bedeutung. 
Kehren bestimmte Befehlsfolgen in einem Programm 
immer wieder, so kann man sie unter einem selbstgewähl¬ 
ten Namen zusammenfassen. Man nennt diese Gruppie¬ 
rungen auch Makros. Das Besondere ist, daß man ein 
Makro wie einen normalen Befehl im Programm verwen¬ 
det, obwohl es ihn eigentlich gar nicht gibt. Tabellen werden 
in Maschinensprache sehr oft benötigt. Dort stehen bei¬ 
spielsweise wichtige Werte, die für einen Programmteil zur 
Arbeit erforderlich sind. Mittels einfacher Kommandos las¬ 
sen sich derartige Tabellen einfach in den Programmtext 
einfügen. Will man zum Beispiel einen Text in einer Tabelle 
ablegen, ist es in Maschinensprache normalerweise nötig, 
jeden einzelnen Buchstaben zunächst in den entsprechen¬ 
den Code umzuwandeln, um ihn in die betreffende Spei¬ 
cherstelle zu schreiben. Bei Hypra-Ass kann der Text direkt 
in die Tabelle eingegeben werden, ähnlich den DATA-State- 
ments bei Basic. Die Umwandlung wird beim späteren 
Übersetzungsvorgang automatisch bewerkstelligt. Hypra- 
Ass besitzt auch einige Kommandos, die wie in Basic IF, 
THEN und ELSE genannt werden und ähnliche Funktionen 
ausführen. Mit ihnen ist es möglich, daß bestimmte Teile 


Der C64 bekommt Rechenunterricht 


Vielleicht haben Sie schon leidvoll festgestellt, daß der C 64 
das Rechnen nicht so genau nimmt, wie man es manchmal 
wünscht. Falls Sie diesen Vorwurf an den C64 nicht glau¬ 
ben wollen, probieren Sie doch einmal folgendes aus. 

PRINT 9t2 

Diese Anweisung müßte eigentlich das Quadrat von 9 
errechnen und somit das Ergebnis 81 ausgeben. Der C64 
ist jedoch gänzlich anderer Meinung. Er behauptet, das 
Ergebnis sei 81,0000001. 

Dieses Manko beseitigt »Arith13«, unsere Anwendung 
des Monats aus 64’er 3/87. Denn »Arith13« ist ein außerge¬ 
wöhnliches Programm, das es erlaubt, jegliche Berech¬ 
nungen auf 13 Nachkommastellen genau vorzunehmen. 
Gleichzeitig wurden die oben vorgestellten Unzulänglich¬ 
keiten des C64-Basic beseitigt, so daß man den C64 
zusammen mit dieser Erweiterung zu Recht als Rechen¬ 
genie bezeichnen kann. Die genauen Rechenroutinen wer¬ 
den mittels eines neuen PRINT-Befehls angesteuert und 
funktionieren bei allen nur erdenklichen Berechnungen. 
Selbst die mathematischen Funktionen SIN, COS, TAN und 
ATN werden mit neuer Genauigkeit errechnet. 

Kurvendiskussion perfekt 


Nein, es geht hier nicht um Brigitte Bardot oder den Nür¬ 
burgring. Es geht um die für viele so lästige Mathematik. 
»Kudi 64«, unsere Anwendung des Monats aus Ausgabe 
2/87, bringt dem Anwender die Kurvendiskussion durch 
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Meisterhaft schreiben mit Master-Text 


Eine der Hauptanwendungen für Computer ist die Textve¬ 
rarbeitung. Auch um diese Belange hat sich das 64’er- 
Magazin gekümmert und seinen Lesern mit der Master- 
Text-Serie zwei vorbildliche Textverarbeitungsprogramme 
für den C64 und C128 vorgestellt. Zunächst »Master-Text 
64«: Dieses in Ausgabe 6 und 7/86 und als verbesserte und 
überarbeitete Version in Sonderheft 16 veröffentlichte Pro¬ 
gramm kann schlicht und einfach als Renner bezeichnet 
werden. Es zeichnet sich durch einfache Bedienung, 
Menüsteuerung und großen Komfort aus (Bild 8). Als Extras 
bietet es eine Serienbrief-Funktion und einen 80-Zeichen- 
Zeigemodus, in dem man einen Eindruck vom Aussehen 
des später gedruckten Dokuments erhält. 


Bild 6. Eine von »Kudi 64« errechnete Funktion 


Anschaulichkeit und exakte Berechnung näher. Auch hier 
wurden, wie bei »Arith13«, optimierte Rechenroutinen ver¬ 
wendet. Kudi 64 ist in der Lage, jede eingegebene Funktion 
im Grafik-Modus zu zeichnen (Bild 6) und gibt anschließend 
sowohl die erste und zweite Ableitung als auch Nullstellen 
und Wendepunkte auf dem Bildschirm aus. Von dem 
unliebsamen Ballast der Berechnungen befreit, kann man 
sich als Schüler oder Student mit Kudi 64 voll dem Ver¬ 
ständnis für die eigentliche Materie widmen - oder die so 
gewonnene Zeit für angenehmere Tätigkeiten nutzen. 




Bild 8. Der Editor von »Master-Text 64« 


Master-Text 128, ein Programm für den C128, das in Son¬ 
derheft 18 veröffentlicht wurde, darf für sich das Attribut 
»professionell« beanspruchen. Es bietet neben den Stan¬ 
dardoperationen allen Komfort, den man sich als C128-Be- 
sitzer wünschen kann. Zum Beispiel: Menü- und Fenster- 
Technik (Bild 9), Textbausteinfunktionen, eine ständig 
abrufbare Help-Seite, eine eingebaute Uhr und einen 
Taschenrechner sowie einen vollwertigen DFÜ-Modus, der 
auch zum Konvertieren von Texten geeignet ist. Seine Lei¬ 
stungsfähigkeit mußte Master-Text 128 schon in der Test¬ 
phase beweisen. Mit ihm wurde nämlich eine komplette 
Diplomarbeit geschrieben, die den Korrektor nicht zuletzt 


Bild 7. Die Benutzeroberfläche von »Prodisc« 


Ordnung im Diskettenchaos 


»Irgendwo muß das Programm doch sein!« Mit diesem Satz 
und zahlreichen Flüchen auf den Lippen haben Sie sicher 
schon des öfteren ein wichtiges, dringend benötigtes Pro¬ 
gramm gesucht und nach dem erfolglosen Sichten von 
etwa 20 Directories entmutigt aufgegeben. Angesichts die¬ 
ser Probleme veröffentlichten wir in Ausgabe 6/86 »Pro¬ 
disc«, ein menügesteuertes Diskettenverwaltungspro¬ 
gramm. Es arbeitet mit Fenster-Funktionen (Bild 7) und 
Steuerung per Joystick/Maus und kann pro Datendiskette 
die Kapazität von über 500 Diskettenseiten oder 1745 Pro¬ 
grammnamen verwalten. Es stehen schnelle Sortier- und 
Suchalgorithmen nach verschiedensten Kriterien zur Aus¬ 
wahl, so daß mit Prodisc das oben beschriebene Problem 
wohl der Vergangenheit angehört. 
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wegen ihrer perfekten äußeren Form zu einer sehr guten 
Bewertung veranlaßte. 

Das Ende der Zettelkiste: »Datev« 


Ein weiterer Bereich, in dem sich der Einsatz eines Compu¬ 
ters geradezu anbietet, ist die Datenverwaltung, beispiels¬ 
weise bei Adressen, Kundenkarteien, Büchern, Schallplat¬ 
ten etc. Unser Programm »Datev« aus dem Sonderheft 9/86 
zum Thema Floppy und Dateiverwaltung wird diesem 
Zweck in optimaler Weise gerecht. Es ist, wie fast alle der 
hier vorgestellten Programme, vollständig in Assembler 
geschrieben und besitzt Funktionen, die man eigentlich 
nur von professionellen Programmen erwartet. Es ermög¬ 
licht die Verwaltung von bis zu 1024 Datensätzen bei einer 
maximalen Datensatzlänge von 256 Zeichen (also bei¬ 
spielsweise Name, Adresse, Telefon, Beruf, Bemerkung 
etc.) pro Datendiskette. Ein Datensatz darf dabei bis zu 15 
Datenfelder umfassen (Bild 10), von denen bis zu drei als 
Indexfelder definiert werden können. Nach Begriffen aus 
diesen Feldern können die Daten später gezielt durch¬ 
sucht, sortiert oder verglichen werden. Natürlich lassen 
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Bild 10. Daten professionell verwaltet mit »Datev« 


sich die so gefundenen Daten ausdrucken oder später in 
einem Textverarbeitungsprogramm für Serienbriefe ver¬ 
wenden. Textverarbeitung und Datenverwaltung arbeiten 
hier also Hand in Hand. 

Der C64 als Klangwunder 



Bild 11. Hitverdächtig: »Der Sound-Monitor« 


Mit »Proterm V.6« auf DFÜ-Reise 


Die Datenfernübertragung über das Telefon mit Hilfe eines 
Modems oder Akustikkopplers gewinnt immer mehr an 
Bedeutung, sowohl im professionellen als auch im Hobby¬ 
sektor. Mit »Proterm V.6«, dem Listing des Monats aus Aus¬ 
gabe 4/87, steht Ihnen ein Terminalprogramm zum Abtip¬ 
pen zur Verfügung, das kaum Wünsche offenläßt (Bild 12). 

Es bietet neben Standardfunktionen wie der Parameter¬ 
einstellung auch die Wahl zwischen der Verwendung des 
ASCII- oder des Commodore-Codes, arbeitet mit Funk¬ 
tionstastenbelegung und stellt zwei Textspeicher zur Verfü¬ 
gung, die getrennt editiert und gesendet werden können. 
Nati'f’Oh kann die Übertragung der Daten auch protokol¬ 
liert und bei Bedarf auf Diskette gespeichert werden. Sehr 
nützlich ist auch die Möglichkeit, ganze Programme über 
das Telefonnetz zu empfangen oder zu senden. Eine wich¬ 
tige Funktion für den »alten DFÜ-Hasen« stellt die »Auto- 
dialer«- und »Autohacker«-Funktion dar. Mit diesen kann 
Proterm V.6 bei Anschluß eines Modems automatisch Tele¬ 
fonnummern wählen oder auch nach ganz bestimmten 
Datex-P-Anschlüssen suchen. 

Sollten Sie sich also auf die Reise per DFÜ begeben, so 
wird Ihnen Proterm V.6 ein guter Begleiter sein. 

Diese Auswahl aus unseren Spitzen-Programmen ist 
natürlich längst nicht vollständig. Gerade die Tips, Tricks 
und Utilities, die im 64’er-Magazin veröffentlicht wurden, 
sind es, die dem Computer-Freak oder Anwender das 
Leben mit seinem Hobby leichter machen. Doch schon mit 
den hier beschriebenen Programmen haben Sie einen 
Grundstock all dessen, was man zur Arbeit mit dem C64 
braucht. (Michael Thomas/sk) 


Wenn Sie Besitzer einiger Spiele sind, haben Sie sich 
sicher schon gefragt, wie man diese tollen Musikstücke auf 
dem C64 schreiben kann, die als Spieluntermalung aus 
dem Lautsprecher des Monitors kommen. Im krassen 
Gegensatz dazu haben Ihre Versuche in dieser Richtung 
nach endlosen PEEK- und POKE-Orgien vielleicht gerade 
»Hänschen klein« in bescheidener Qualität aus dem Laut¬ 
sprecher gelockt. Mit dem »Sound-Monitor«, unserem 
»Listing des Monats« aus Ausgabe 10/86, können auch Sie 
problemlos professionelle Stücke komponieren (Bild 11). 
Eine Langspieldiskette (und Hifi-Kassette), die man unter 
der Bestellnummer MS 630 beim Markt & Technik Verlag 
bestellen kann, beweist die Leistungsfähigkeit des Sound- 
Monitors. Viele Stücke auf der Diskette wurden mit diesem 
Programm komponiert beziehungweise für den C64 umge¬ 
schrieben. 



00 : 01:4 


Bild 12. Mit »Proterm V.6« auf der Reise durchs Telefonnetz 
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lernen mit dem C 64 


Lernen ohne Lehrer - der Computer macht’s 
möglich. Welche nützlichen Programme Sie 
dabei unterstützen, erfahren Sie hier. 

G egenwärtig befinden wir uns in einer Übergangs¬ 
phase zu einer Informationsgesellschaft, in der der 
Computer immer mehr an Bedeutung gewinnt. Dabei 
interessiert natürlich auch die Frage, wie man den Compu¬ 
ter zum schulischen und außerschulischen Lernen nutzen 
kann. Unternehmen Sie mit uns einen Streifzug durch das 
mittlerweile schwer zu überschauende Angebot an Lern¬ 
software. Zunächst ein Überblick, was man alles mit dem 
Computer lernen kann: Auf spielerische Weise kann man 
mit dem »Flugsimulator II« seinen Flugschein vorbereiten, 
oder man beantwortet Quiz-Fragen wie bei »QUIWI« von 
Kingsoft. Sie können auch Berechnungen durchführen, 
mathematische Gleichungen und Kurvendiskussionen 
lösen wie bei »Ali« (Bild 1) von Heureka-Teachware oder 
»Bruchrechnen« (Bild 2) von Unterrichtsmedien-Hoppius, 
oder eigenes Briefpapier und Einladungen künstlerisch 
gestalten mit »Hi-Eddi+« von Markt & Technik. Neue Fach¬ 
gebiete für den Schulunterricht oder für sich selbst lassen 
sich zu Hause erarbeiten durch Vokabellernprogramme 
wie »Learning English - Modern Course« (Bild 3) von 
Heureka-Teachware, »Polissez Votre Franpais« von Data 
Becker oder Rechtschreibung trainieren mit der »Recht¬ 
schreibtafel« (Bild 4) von Unterrichtsmedien-Hoppius. Das 
Zehn-Finger-System ist erlernbar mit »Maschinenschrei¬ 
ben« (Bild 5) aus dem Falken-Verlag, oder Sie wiederholen 
höhere Mathematik mit »Computerlösungen für Schule 
und Studium« des MVG-Verlags. Im musikalischen Bereich 
läßt sich der Computer zum Komponieren einsetzen, bei¬ 
spielsweise mit »Music Shop« von Broderbund oder dem 
»Sound-Monitor« aus unserer 64’er-Ausgabe 10/86. Auf alle 
Fälle sollte man mit dem C64 erlernen, Texte mit dem Com¬ 
puter zu verarbeiten. Das erleichtert es, ein Referat zu 
schreiben, Einladungen und Rundschreiben zu versenden 
oder Bewerbungen zu verfassen. 

Messen, Steuern und Regeln ist ein weiteres Betäti¬ 
gungsfeld, bei dem man mit viel Spaß basteln und eine 
Menge lernen kann. Viele Versuche aus Physik, Chemie, 
Biologie und Technik lassen sich durch den Computer her¬ 
vorragend steuern und auswerten. Versuche, die oft über 
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Bild 1. Eine Aufgabe mit dem Algebra-Programm »ALI« mit 
den einzelnen Rechenschritten 


sehr lange Zeiträume laufen müssen, aber auch blitz¬ 
schnelle Änderungen kann der C 64 erfassen und über den 
Monitor visuell darstellen. Zum Experimentieren bieten 
Fischer-Technik und Lego Computer Baukästen für den 
C64. Beim Arbeitskreis Computer im Chemieunterricht 
(Institut Dr. Flad, Bretscheidstraße 127, 7000 Stuttgart) 
erhält man angeblich sogar kostenlos Chemieprogramme 
mit Begleitheft zum Ausprobieren. 

Simulationsprogramme, mit denen man komplexe 
Systeme und Vorgänge analysieren und simulieren kann, 
sind im Kommen. Zum Beispiel die CNC-Technologie mit 
»CNCTIX« vom Klett-Verlag oderZusammenhänge in unse¬ 
rer Umwelt mit »Umweltdynamik« aus dem TEWI-Verlag. 
Auch die Datenkommunikation gehört zu den zukunfts¬ 
trächtigen Anwendungen, die man mit dem C64 erlernen 
kann. DFÜ und BTX sowie Mailboxen und Datenbanken 
sind hier die Stichworte. Nun möchten wir Ihnen einige 
bewährte Programme vorstellen, die mit Schülern und Stu¬ 
denten getestet wurden. Sie sollen aber noch wissen, daß 
weitere Informationen zu Lernsoftware in den 64’er-Aus- 
gaben 8/86 und 2/87 sowie im Sonderheft 16 (für Einsteiger) 
zu finden sind. 

Die Rechentafel - Bruchrechnen (Bild 2) 

Umfang und Handhabung: Alle wichtigen Bereiche der 
Bruchrechnung sind enthalten - Addition, Subtraktion, 
Multiplikation, Division, Erweitern und Kürzen. Außerdem 
werden echte und unechte sowie gemischte Brüche und 
Kettenaufgaben behandelt. Ein sehr ausführlicher Teil mit 
Reche.regeln und Beispielaufgaben kann jederzeit ange¬ 
wählt werden, sogar während einer bereits begonnenen 
Rechenaufgabe. Ein Rücksprung zum Hauptmenü ist 
möglich. 

Didaktische Bewertung: Die Arbeitsweise ist durch gute 
Menüsteuerung weitgehend selbsterklärend. Die Regel¬ 
ableitungen mit den vorgerechneten Beispielen ist eine der 
besten Einführungen, die uns bekannt sind. Geschickt ist 
auch die farbige Darstellung der berechneten Teilschritte 
während des Lösungsversuchs, wie überhaupt der Bild¬ 
schirmaufbau als gelungen bezeichnet werden kann. 

Die wählbaren Schwierigkeitsgrade sind gut abge¬ 
stimmt. Leider muß der Bruchstrich jeweils mit »B« extra 
angefordert werden, was den Arbeitsfluß unnötig hemmt. 
Das Programm ist mit einem Kopierschutz versehen. 



Bild 2. Mit dem Programm »Die Rechentafel« können Sie 
Bruchrechnen erlernen 
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Bild 3. Das Programm »Learning English« unterstützt das 
gleichnamige Buch 


Vorsicht! Bei 7u«»rnineng»ietrt«n Wörtern 
klingt rt;«s oft wie ein |*>|. 

So kannst du dir helfen: 

überlege, aus welchen teilen diese 
Wörter bestehen! Schreibe die lei le¬ 
in dein Heft! 

das Kr ii'rc hen = _________ + fr ■' m . n 

die Schlagader = 1 _ + j 

das Wagr> s = + L_ 


Bild 4. Die »Rechtschreibtafel« hilft den jungen Schülern 
weiter 


Gesamtbewertung: Gut geeignet für Schüler ab Klasse 
6 und Auszubildende. 

Anbieter und Preis: Unterrichtsmedien-Hoppius, Bann¬ 
straße 27, 6330 Wetzlar; Diskette für 79 Mark. 

ALI - das intelligente Algebraprogramm (Bild 1) 

Umfang und Handhabung: Die neueste Version 4 des 
mehrfach weiterentwickelten Programms enthält neben 
binomischen Formeln verschachtelte Klammerberechnun¬ 
gen, quadratische Gleichungen und Potenzen. Faktoren¬ 
zerlegung und Nullstellenbestimmung höheren Grades 
sind weitere Schwerpunkte dieses Programms. Implizit 
definierte Funktionen und grafische Lösungen für Glei¬ 
chungen mit zwei Unbekannten sind ebenfalls vorhanden. 

Die einfache Menüsteuerung gestattet eine bequeme 
Vorgehensweise, ein Rücksprung ins Hauptmenü ist mög¬ 
lich. Neu ist bei dieser Version die Einbindung eines 
Floppy-Beschleunigers, der Ladezeiten von nur noch 14 
Sekunden ermöglicht. Falls sich wegen schlechter Justie¬ 
rung des Laufwerks Probleme ergeben, kann eine langsa¬ 
mere Laderoutine gewählt werden. Wenn alles nichts hilft, 
läßt sich diese noch mit POKE 999,9 abschalten und somit 
auf jeden Fall ein ganz normales Laden mit LOAD"!",8,1 
bewirken. 

Zusätzlich können Sie Tests erstellen, in denen die Auf¬ 
gaben als Lückentexte dargestellt sind, eine wesentliche 
Arbeitserleichterung für Lehrer. Grafische Darstellungen 
von Funktionen und deren Wertetabellen sind auf dem 
Drucker darstellbar, wobei durch Voreinstellung der Geräte¬ 
konfiguration (Druckertyp und Interface) die Anpassung 
recht einfach ist. 

Didaktische Bewertung: Mustergültig ist das Vorrechnen 
der Beispielaufgaben. Der jeweilige Teilschritt wird deutlich 
hervorgehoben. Gibt man eigene Aufgaben ein, so sind 
persönliche Lösungvorschläge, die vom typischen 
Rechenweg abweichen, zulässig, wenn diese richtig sind. 
Falsche Ansätze kommen gar nicht erst auf den Monitor. 

Sehr interessant sind auch die Wertetabellen mit den 
Zeichnungen der zugehörigen Geraden oder Parabeln. 
Derzeit ist es wohl das beste Programm dieses Fachgebiets 
für den C64. Die Programmdiskette ist kopiergeschützt. 

Gesamtbewertung: Sehr gut geeignet für die Klassen 
6 bis 12 an Realschulen, Gymnasien und Berufsfach¬ 
schulen. 

Anbieter und Preise: Heureka-Teachware, Paul-Hösch- 
Straße 4,8000 München 60; Diskette 99 Mark. Für 36 Mark 
erhält man eine Update-Version, wenn man die alte 
Original-Diskette einsendet. 

aas? 


Geometrie für dritte/vierte Klasse (Bild 6) 

Umfang und Handhabung: Das Programm ist auf der 
Diskette »Bit in Mathematik« enthalten, wobei die Grundre¬ 
chenarten vom ersten bis vierten Schuljahr behandelt wer¬ 
den. Mit dem dabei enthalten Geometrie-Programm bear¬ 
beiten Sie Spiegelbild-Figuren, bei denen die Spiegel¬ 
achsen bestimmt oder gezeichnet werden müssen. Ferner 
sind Muster zu zeichnen beziehungsweise fortzusetzen. 
Würfel und Quader sollen ebenfalls dargestellt werden. Die 
Eingabe kann über Joystick oder Tasten erfolgen. Eine 
Rückkehr ins Hauptmenü ist jederzeit möglich. 

Didaktische Bewertung: Die Aufgaben, Anweisungen 
und : “cnüführungen sind gut gelungen und abwechs¬ 
lungsreich gestaltet. Sie entsprechen der zugehörigen 
Klassenstufe. Vielleicht wäre es sinnvoller gewesen, das 
Programm auf Diskette anzubieten, um eigene Entwürfe 
oder bereits erzielte Teilergebnisse speichern zu können. 
Obwohl an Motivationshilfen gespart wurde, ist das Pro¬ 
gramm vom Gesamtkonzept her vernünftig aufgebaut. 

Gesamtbewertung: Recht gut geeignet ab (Ende) 
Klasse 3. 

Anbieter und Preise: Georg Westermann Verlag GmbH, 
Georg-Westermann-Allee 66, 3300 Braunschweig; kom¬ 
plette Diskette für 29,80 Mark 

Mathemat 

Umfang und Handhabung: Wollte man sämtliche The¬ 
men aufzählen, die das Programm beinhaltet, müßte ein 
eigener, umfangreicher Testbericht darüber geschrieben 
werden. Daher fassen wir uns kurz. Kurvendiskussion, Vek¬ 
torrechnung, Geometrie/Algebra, Wahrheitstabellen und 
Analysis sind die Schwerpunkte. Ein »Mathelexikon« ist 
auch noch enthalten, ferner einige Druckerroutinen und 
Diskettenbefehle. Die Menütechnik vereinfacht den 
Umgang mit dem Programm. 

Didaktische Bewertung: Diese Art von Lernsoftware ist 
nichts für Anfänger. Aber sie eignet sich hervorragend als 
Ergänzung zum Schulunterricht. Das Programm könnte 
auch als »Super-Nachhilfestunde« bezeichnet werden. Mit 
Speeddos-Betriebssystemen läuft das kopiergeschützte 
Programm nicht. 

Gesamtbewertung: Gut geeignet ab Klasse 9 in Real¬ 
schulen und Gymnasien, teilweise auch für Fachoberschu¬ 
len. 

Anbieter und Preise: Data Becker GmbH, Merowinger¬ 
straße 30, 4000 Düsseldorf; Diskette für 19,90 Mark. 


SONDERHEFT 19 


23 











0l*r-iuilinti,iU 













C64 


SOFTWARE 


. . : . ; , 


t ;j . | rfr 

: K ilT.ht'f» f 1 





( (1 i < 1 • i 


7(* i 1 ; 

OO 03 02 

ffff jjjj ffff 

jjjj f*f* 

jjjj 

ffff JJJJ 

■ i'fc -i 'r uM' 

JlT|8JI3JIp| 

f '■ 


, r oi[if : if? i 1 1 

fzlBimfoilP 

f.jll >1:. 


M i "1 : 






iuD 




i 



Hürrel- oder Quaderflächen suchen 


Suc he 
einen 


L r r\i\ 


hen, die zusammengesetzt 
oder einen Quader ergeben! 



Bild 5. Mit »Maschinenschreiben«, können Sie das Zehn- 
Finger-System erlernen 


Computer-Lösungen für Schule und Studium, 

Teil 1 und 2 

Umfang und Handhabung: Auf der ersten Diskette befin¬ 
den sich schulische Themen ab Klasse 10 wie Zinsrech¬ 
nung, Primfaktorzerlegung, quadratische Funktionen, line¬ 
are Gleichungen, Trigonometrie sowie Differential- und 
Integralrechnung. Die Handhabung ist unkompliziert. 

Ein sehr interessantes Unterprogramm ist auf der ersten 
Diskette enthalten: ein recht leistungsfähiges Zeichenpro¬ 
gramm mit integrierter Kurvendiskussion. 

Die zweite Diskette nimmt die Infinitesimalrechnung wie¬ 
der auf und führt über Ausgleichs- und Näherungsrech¬ 
nung, geometrische Muster und Kegelschnitte zu Trigono- 
metrie und analytischer Geometrie. Aufgaben zur Wahr¬ 
scheinlichkeitsrechnung und Statistik ergänzen das Pro¬ 
grammangebot. 

Didaktische Bewertung: In Verbindung mit zwei Büchern 
sind die Herleitungen und algorithmischen Strukturen in 
pädagogisch angemessener Form dargeboten. 

Beide Programme sind nichts für Anfänger, aber zum 
Erschließen von Lücken, zum Experimentieren und vor 
allem zur Festigung des Gelernten sind beide Disketten gut 
ersetzbar. 

Sehr nützlich sind die Programme zur dreidimensiona¬ 
len Darstellung von Funktionen. Didaktisch geschickt auf¬ 
gemacht ist die Vorgehensweise, wie der Benutzer dazu 
geführt wird, Körper zu entwerfen und dabei neue Winkel 
und Koordinatenachsen auszuprobieren. Durch Beispiel¬ 
aufgaben werden beide Programme aufgelockert. 

Unerfreulich ist, daß Zahlenreihen nicht untereinander 
stehen. Die Lesbarkeit wird dadurch erschwert. Ebenso 
sollten ENETEN statt ENTEN nicht Vorkommen. Auf einen 
Kopierschutz wurde verzichtet. 

Gesamtbewertung: Gut geeignete Programme für die 
gymnasiale Oberstufe, zur Abitur-Vorbereitung und für Stu¬ 
denten. 

Anbieter und Preise: mvg-Verlag, Postfach 1761, 8910 
Landsberg; Diskette je 58 Mark, Arbeitsbuch Teil 1 und 2 je 
29,80 Mark. 

Geo: das konstruktive Geometrie-Programm (Bild 7) 
Was bietet das Programm im einzelnen? 

Es eignet sich zur Unterstützung des Geometrieunter¬ 
richts in der Mittelstufe für Lehrkräfte und Schüler von Real¬ 
schulen und Gymnasien und ermöglicht Achsenspiege¬ 
lung, Mehrfachbildung und zentrische Streckung. 

Diese und andere Grundkonstruktionen wie Strecken¬ 
übertragungen bis hin zum Thaieskreis sind mit einem ein¬ 
zigen Aufruf durchführbar. 


Bild 6. »Geometrie« für die dritte/vierte Klasse wird vom 
Westermann Verlag angeboten 


Durch schnelle Eingabe von Standardbezeichnungen in 
dafür vorgegebene Masken, beispielsweise Großbuchsta¬ 
ben für Punkte oder griechische Buchstaben für Winkel, 
können alle Konstruktionen rasch erstellt werden, die sonst 
auf herkömmliche Art mit Zirkel und Lineal gezeichnet wer¬ 
den müßten und oftmals wegen des großen Zeitaufwands 
im Unterricht verbleiben. Durch übersichtliche Menüge¬ 
staltung und exakte Hinweise im Begleitheft wird ein 
schnelles Einarbeiten möglich. Im Falle einer fehlerhaften 
Eingabe antwortet das Programm zwar mit einem akusti¬ 
schen Signal, jedoch wäre hier wünschenswert, entspre¬ 
chende Rückfragen als Hilfestellung für den Lernenden 
einziuminden. Nützlich ist eine Maskenvorgabe als Ent¬ 
scheidungshilfe, die Darstellungsmöglichkeit von vergrö¬ 
ßerten Ausschnitten sowie eine individuell wählbare 
Anpassung auf Interface und Drucker. 

Gesamtbewertung: Zur Zeit zählt das Programm »Geo« 
zu den besten Programmen seines Faches. Geometrie¬ 
kenntnisse werden vorausgesetzt. Das Programm ist des¬ 
halb auch als unterrichtsbegleitendes Medium entwickelt 
worden. Ein Lernfortschritt ist in jedem Falle zu erwarten, 
zum reinen Selbststudium bedarf es zusätzlicher Fachlite¬ 
ratur. Das Programm hat zwar einen Kopierschutz, doch 
bietet der Autor für inzwischen defekte Disketten gegen 
Einsendung der Original-Diskette und eines Unkostenbei¬ 
trages von 10 Mark eine neue Diskette an. 

Ein sehr schneller Floppy-Beschleuniger ist wie beim 
Programm »Ali« vorhanden. Insgesamt ist das Preis- 
Leistungs-Verhältnis sehr gut, das Programm eignet sich 
gut zur Festigung und Vertiefung der Lerninhalte in den 
Klassen 7 bis 9, ist aber auch zur Wiederholung in höheren 
Klassenstufen einsetzbar. 

Anbieter und Preise: Heureka-Teachware, Paul-Hösch- 
Straße 4, 8000 München 60; Diskette mit ausführlichem 
Begleitheft 64 Mark. 

Learning English - Modern Course, Band 1 bis 6 (Bild 3) 

Wir haben den sechsten Band bereits in unserer 
Lernsoftware-Testreihe der Ausgabe 8/86 vorgestellt und 
beschränken uns hier auf die wichtigsten Punkte. Es ist zu 
beachten, daß diese Reihe von Peter Ostermann und 
einem Autorenteam erstellt wurde und nicht mit dem gleich¬ 
lautenden Programm des Klett-Verlages identisch ist. Der 
gemeinsame Name bezieht sich nur auf die von Klett her¬ 
ausgegebene Schulbuchreihe. 

Das Programm bietet ein lehrbuchbezogenes Vokabel¬ 
training zu dem weitverbreiteten Schulbuch »Learning 
English - Modern Course« für die Sekundarstufe 1 und ist 
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Bild 7. »Geo« von Heureka-Teachware ist hervorragend zur 
Unterrichtsbegleitung geeignet 
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Bild 8. Die »Lernkartei« ist ein großes Lernpaket (Gramma¬ 
tik, Erdkunde, Biologie, etc.) für Schüler ab Klasse 4 


auch für Wiederholungen in der Oberstufe ersetzbar. 
Interessant sind die zahlreichen Abfragemöglichkeiten, so 
daß Langeweile vermieden wird. Man kann vom englischen 
oder deutschen Wort ausgehen oder von der Definition, 
besonders wichtig für einsprachiges Lernen! Sowohl in der 
Reihenfolge der Lektionen als auch kreuz und quer ist ein 
gezieltes Arbeiten möglich, wobei die Vokabeln nicht nur 
isoliert, sondern auch im Kontext geübt werden können. 
Gerade das ist besonders hilfreich, weil man den Stoff, den 
man im Zusammenhang lernt, viel besser behält. Unregel¬ 
mäßige Verben können systematisch trainiert werden. Gut 
ist auch die Lexikonfunktion, die mit der F8-Taste jederzeit 
aufgerufen werden kann: Unbekannte Vokabeln und ihre 
Stammformen werden auf den Bildschirm gebracht und 
erklärt. Dabei kann man vorwärts und rückwärts blättern, 
sich die Übersetzungen, aber auch die gängigsten eng¬ 
lischsprachigen Definitionen ansehen und einprägen. 

Schulenglisch per Sofwure 


Was wir bis jetzt in keinem anderen Vokabellernprogramm 
fanden: Das Programm erkennt einzelne Rechtschreibfeh¬ 
ler und ermöglicht deren Korrektur, sogar bei falschen Prä¬ 
positionen! 

Gesamtbewertung: Die Arbeitsweise ist durch gute 
Menüsteuerung weitgehend selbsterklärend und jederzeit 
ein Rücksprung an den Programmanfang möglich. Eine 
gesonderte Help-Funktion erlaubt gezielte Lösungshilfen. 
Deutsche Umlaute, Tastaturbelegung nach DIN sowie das 
»ß« sind selbstverständlich. Das Begleitheft ist klar ver¬ 
ständlich geschrieben. Wortschatz und didaktischer Auf¬ 
bau sind gut. Das Preis-Leistungs-Verhältnis stimmt eben¬ 
falls. Kopierschutz und Floppy-Beschleuniger sind wie bei 
»ALI« vorhanden. Insgesamt ist das Lernprogramm sehr 
gut für die Klassen 5 bis 10 einsetzbar. 

Anbieter und Preise: Heureka-Teachware, Paul-Hösch- 
Straße 4, 8000 München 60; Disketten für je 64 Mark. 

Maschinenschreiben (Bild 5) 

Software zum Erlernen des Zehn-Finger-Blindschrei- 
bens werden seit Jahren angeboten, leider sind sie häufig 
unbrauchbar, weil bei der Entwicklung selten erfahrene 
Lehrkräfte mitwirken. Erhebliche didaktisch-methodische 
Fehler sind die Folgen. Was nützt beispielsweise ein 
Schreibmaschinenprogramm, das nicht einmal die 
Umlaute »ä«, »ö« und »ü« schreiben kann. 

Was bietet nun das Programm »Maschinenschreiben«? 


Auf der Systemdiskette befinden sich neben einer 
Grundlektion noch 32 Übungslektionen, die von einfachen 
Fingerübungen bis hin zu kompletten Texten reichen. Vor 
dem eigentlichen Beginn der Übungen geht das gut ge¬ 
gliederte Handbuch auf Sitzhaltung, Arbeitsplatz und 
Gymnastikübungen zur Lockerung der Finger ein, um dann 
in verständlicher Sprache die eigentlichen Übungen und 
Möglichkeiten des Programms darzulegen. 

Wahlweise kann man mit deutscher DIN- oder Commo- 
dore-Tastatur arbeiten. Als Hilfestellung sind dem Pro¬ 
gramm Aufkleber beigefügt, die man auf die anders beleg¬ 
ten Tasten kleben kann. 

Aia äußerst nützlich erweisen sich die Optionen »Fehler¬ 
geräusch« und »Metronom« (Taktgeber), die variabel ein¬ 
stellbar sind und der Einübung eines gleichmäßigen 
Anschlags sowie der Fehlerrückmeldung dienen. Wen das 
anfangs stört, der kann beide Funktionen auch abschalten. 
Die Schreibgeschwindigkeiten lassen sich über die Tasten 
<+> bzw. <-> (schneller/langsamer) bestimmen. 

Neben der Möglichkeit, mit den Übungen auf der Pro¬ 
grammdiskette zu arbeiten, gibt es auch über eine 
bequeme Menüführung die Option, eigene Texte einzuge¬ 
ben und diese zu speichern. Dies ist besonders sinnvoll, 
wenn man mit einem bestimmten Lehrgang, beispiels¬ 
weise für Abendkurse, zielgerichtet üben möchte. Komfort 
bieten auch die Funktionen »Directory« und »Texte 
löschen«. 

Gesamtbewertung: Über ein kleines Textverarbeitungs¬ 
programm lassen sich die Texte auch ausdrucken. Aller¬ 
dings läuft das Druckprogramm anscheinend nur korrekt 
bei Direktanschluß über Centronics-Schnittstelle oder mit 
Commodore-Druckern. 

Wer möchte, kann sogar die fertigen Lektionen editieren 
- das fanden wir bisher nirgends. Ein Ergebnisprotokoll 
macht vernünftige Angaben zum Lernfortschritt. 

Das Programm eignet sich gut für alle, die aus beruf¬ 
lichen oder privaten Gründen rasch das Zehn-Finger- 
System erlernen wollen. 

Anbieter und Preise: Unterrichtsmedien-Hoppius (siehe 
Rechentafel) und Falken-Verlag, Postfach 1120, 6272 Nie¬ 
dernhausen/Ts; Diskette 49,80 Mark. 

Rechtschreiben mit Köpfchen, Teil 1 (Bild 4) 

Umfang und Handhabung: Ein Rechtschreibtrainings¬ 
programm mit Bildern und Melodien; es besteht aus drei 
Disketten und schriftlichem Begleitmaterial für ergänzende 
Übungen. In Teil 1 werden ähnlich klingende Endlaute bei 
Substantiven trainiert, beispielsweise Berg/Werk oder 
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Rad/Tat. Die zweite Diskette behandelt Endlautverhärtun¬ 
gen wie singt/sinkt. Der Teil 3 unterscheidet Endlaute bei 
Adjektiven wie rund/bunt und bearbeitet die Rechtschreib¬ 
probleme, die bei zusammengesetzten Wörtern auftreten 
können, beispielsweise in Windrad. 

Didaktische Bewertung: Das Programm enthält überzeu¬ 
gende Beispiele und gute Kombination von Regelableitung 
mit Aufgabenteil. Gut sind auch die differenzierten Übun¬ 
gen mit selbst wählbarem Schwierigkeitsgrad; der Wort¬ 
schatz ist akzeptabel. Positiv auf die Motivation dürfte sich 
gerade bei jüngeren Schülern das abwechslungsreiche 
Bildmaterial mit den Melodien auswirken. Begleitheft und 
Arbeitsmappe sind gut einsetzbar. 

Gesamtbewertung: Sehr gut geeignet als Lese- und 
Rechtschreibtraining ab (Ende) Klasse 2 bis etwa Klasse 6. 

Anbieter und Preise: Ernst-Klett-Verlag, Postfach 809, 
7000 Stuttgart; sowie Unterrichtsmedien - Hoppius, Bann¬ 
straße 27, 6330 Wetzlar; je Diskette 49 Mark. 

Lernkartei (Bild 8) 

Einem Schweizer Mittelstufenlehrer arbeitete die Schul¬ 
bürokratie viel zu langsam, und so wurde aus seiner Klasse 
das erste schuleigene EDV-Zentrum der Schweiz. Über ein 
Multi-User-System mit Floppy 1541 werden dort sechs 
C64-Computer gesteuert. Seine Schüler zeigten sich 
ebenso experimentierfreudig, und herausgekommen ist 
eine randvolle Diskette mit dem Titel »Lernkartei«. 

Was bietet die Lernkartei? 

Sie ist nicht bloß ein Trainingsprogramm für Rechtschrei¬ 
bung und Grammatik, sie enthält auch Erdkunde, Biologie 
etc. und liefert außerdem ein Eingabeprogramm zur Erstel¬ 
lung eigener Lerndateien. Noch eines ist hervorzuheben: 
Man kann aus den Dateien einzelne Fragen zusammensu¬ 
chen und damit einen Prüfungsbogen erstellen. Wem das 
immer noch nicht reicht, der kann sich ein Arbeitsblatt aus- 
drucken lassen und mit dem auf dem Monitor unsichtbaren 
Codewort »schubi« das Lösungsblatt dazuheften. 

Gesamtbewertung: Die Arbeitsweise ist durch gute 
Menüsteuerung weitgehend selbsterklärend. Ein Rück¬ 
sprung zum Hauptmenü ist fast immer möglich. Umlaute 
sowie das »ß« sind vorhanden. Das Begleithandbuch ist 
klar verständlich geschrieben, die zahlreichen Beispiele 
erleichtern den Umgang mit diesem Programm. Der Wort¬ 
schatz und die Grammatikübungen sind noch nicht in allen 
Fällen an den bei uns verbindlichen Standardwortschatz 
angeglichen, um als typisches Schulprogramm zu gelten. 
Die auf deutsche Verhältnisse zugeschnittenen Übungs¬ 
disketten sollen jedoch bald erhältlich sein. Angesichts der 
vielfältigen Möglichkeiten ist das Preis-Leistungs-Verhält- 
nis akzeptabel. Die »Lernkartei« ist ab Klasse 4 gut einsetz¬ 
bar. 

Anbieter und Preise: Huesmann+Benz Verlag, Hoch¬ 
waldstraße 18, 7700 Singen; Diskette für 90 Mark. 

Softlearning - Grundkurse in Englisch, Französisch, 
Spanisch und Italienisch; Intensivkurse in Englisch, 
Französisch, Spanisch, Italienisch, Schwedisch und 
Russisch 

Zum Abschluß noch eine völlig neue Konzeption: Zu die¬ 
ser Art des Lernens, das von dem bulgarischen Lern¬ 
forscher Prof. Lozanov anwendungsreif entwickelt wurde, 
sind einige Anmerkungen erforderlich. 

In zahlreichen Anzeigen und wissenschaftlichen Beiträ¬ 
gen ist diese gänzlich andere Lernmethode unter dem 
Begriff »Superlearning« bekannt geworden. Was ist nun 
das Neue an dieser Art des Lernens? 

Wie Sie sicher wissen, lernt man schon vor der Geburt 
ununterbrochen freiwillig und sozusagen automatisch, um 
zu überleben. Wir alle, und sämtliche Kinder aller Nationen 


dieser Erde, erlernen daher so schnell und so einfach 
unsere Muttersprache, weil wir ja nur auf diesem Wege 
unsere Wünsche besser artikulieren können und deren 
Erfüllung erreichen. Ohne Kommunikation zu den Mitmen¬ 
schen, insbesondere zu den Eltern, müßten wir scheitern. 

Später in der Schule sieht das leider ganz anders aus, 
denn das natürliche, fast spielerische Lernen des Kindes ist 
nicht mehr gefragt. Ganz im Gegenteil! Der schulische Drill 
läuft im Prinzip darauf hinaus, daß alle Schüler zur gleichen 
Zeit denselben Stoff lernen. Widerstände und Hmemm- 
schwellen sind die Folge. 

Superlearning will diese vermeiden und beginnt deshalb 
mit einer Tiefentspannungs-Übung. Dieses Lockerungs¬ 
training, auch als »Alpha-Zustand« bezeichnet, beginnt 
mit pulsierender Grafik und Musik, begleitet von einem 
Atemtraining. 

Zusätzliche Muskelentspannungs-Übungen (wie auto¬ 
genes Training) verstärken die Alpha-Phase. 

Erst danach erfolgen die eigentlichen Sprachkurse, die 
nach didaktischen Gesichtspunkten gestaltet sind. Gewis¬ 
sermaßen am Bewußtsein vorbei werden die Lerninhalte 
direkt in das Langzeitgedächtnis transportiert. 

Lernen mit Gefühl 


Die Werbung arbeitet übrigens schon seit Jahren so! Har¬ 
monie und Gefühle werden günstig beeinflußt, und unsere 
persönlichen Konflikte und Alltagsprobleme sollen auf die¬ 
sem Wege ausgeklammert werden. 

Das Superlearning nach Lozanov ist eine erfolgverspre¬ 
chende, neue Lernmethode, die im Management schon 
längst praktiziert wird. 

Umfang und Handhabung: Neben dem C64 mit Disket¬ 
tenlaufwerk und Monitor braucht man noch einen Kasset¬ 
tenrecorder, der mit Audio- und Fernbedienungsbuchse 
ausgerüstet sein muß. 

Zu jedem Kurs werden bis zu 4 Sprach-Kassetten gelie¬ 
fert, die über die sogenannte »Systembasis« mit dem Com¬ 
puter synchronisiert werden. Diese Systembasis ist die 
Grundlage für alle Softlearningkurse und braucht nur ein¬ 
mal angeschafft zu werden. 

Nach Erreichen des Alpha-Zustandes beginnt man mit 
den eigentlichen Sprachübungen. Die Dialogtexte werden 
vorgesprochen und synchron auf dem Monitor dargestellt. 
Silbenrätsel, Lückentexte, Multiple-Choice-Aufgaben bei 
denen man unter mehreren Antworten auswählen kann 
und Grammatik sind regelmäßig wiederkehrende Übungs¬ 
formen. 

Bis man sich in die einzelnen Vorgehensweisen eingear¬ 
beitet und die diversen Kabel richtig angeschlossen hat, 
vergeht eine ganze Weile. 

Didaktische Bewertung: Das Konzept ist grundsätzlich 
gut, die Aufmachung und der Wortschatz sind dem Lern¬ 
niveau von Erwachsenen angepaßt. Nicht unwichtig ist es 
für den Lernerfolg, daß man an die Methode »glaubt«, sonst 
erreicht man nie die vorhin beschriebene Tiefentspan¬ 
nung, die ja Voraussetzung für diese besondere Lern¬ 
methode ist. 

Beim Lernen der Vokabeln hilft die Methode der soge¬ 
nannten »Keywords« (Eselsbrücken). Manche Keywords 
sind allerdings weit hergeholt und entsprechen kaum der 
Wirklichkeit. Ladezeiten können inzwischen irritieren. 

Gesamtbewertung: Das Lernverfahren ist gut geeignet 
ab Klasse 13 und für Erwachsene. 

Anbieter und Preise: SM-Softtraining GmbH, Schwan¬ 
thalerstraße 60, 8000 München 2; Disketten für C64: 
Grundkurse je 199 Mark, Intensivkurse je 99 Mark, System¬ 
basis mit Steuermodul 89 Mark. (Rüdiger Werner/kn) 
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SPIELE-LISTING 


Der springende 
Punkt 


Roboter sind wirklich nützliche Geräte. In diesem 
tollen Spiele-Listing soll ein hüpfendes Roboter- 
Ei eine Nachricht überbringen. Stellen Sie sich 
der Herausforderung, es ins Ziel zu bringen. 


Di 


ie Hauptperson dieses Spiels für den C64 ist ein klei- 
| ner Roboter, namens »Roboegg«. Vor ihm liegt ein 
Labyrinth mit Aufzügen, Förderbändern und Statuen 
(Bild 1). Doch es warten viele Gefahren auf den springle¬ 
bendigen Roboter, der durch den Joystick in Port 2 gesteu¬ 
ert wird. Das Ziel jedes Levels ist, lebend das »EXIT«-Feld 
zu erreichen. Dabei läuft keine Uhr mit, und es gibt auch 
keine Punktewertung. Roboegg hat drei Leben. Wenn er 
zweimal auf der Stelle springt, beginnt er nach dem vorzei¬ 
tigen Ableben an dieser Stelle wieder. Ein Druck des Joy¬ 
sticks nach hinten, und es geht weiter. Durch den Feuerk¬ 
nopf kommt man in das Hauptmenü zurück. 

Das Hauptmenü hat fünf Punkte, die man durch die ent¬ 
sprechende Zahlentaste anwählt: 

1. Spielen 2. Editieren 3. Laden 4. Saven 5. Ende 

In der abgedruckten Version befindet sich ein kurzer 
Demo-Level, der Ihnen die Auswirkung der verschiedenen 
Spieleelemente zeigt. Der Baum, die Figur, das Kreuz, die 
Förderbänder und die Pyramide haben keine schädlichen 
Nebenwirkungen, aber die Dolche, Sträucher und Barrie¬ 
ren. Nachdem Sie den eingebauten Level beherrschen, 
können Sie sich ans Gestalten Ihrer eigenen Spielfelder 
machen. Im Editor wird der Cursor nicht durch den Joystick 
gesteuert, sondern über die Cursor-Tasten. Durch die Taste 
<X> setzen Sie ein Zeichen, das Sie durch <Z> gewählt 
haben. Bildteile können entweder aus dem Bild herausge¬ 
nommen werden oder aus dem Zeichensatz-Menü. Um 
dieses auf den Bildschirm zu zaubern, drückt man einfach 
die SPACE-Taste und in der Mitte öffnet sich ein Window, 
das alle Zeichen enthält. Es verschwindet wieder, wenn 
man den Bildschirm etwas zur Seite scrollt. Die Bildteile 
unter dem Window werden dabei nicht gelöscht. Wenn Sie 
aber den Bildschirm löschen wollen, brauchen Sie nur 
<SHIFT CLR/HOME> zu drücken. 


itrtta 

II! 


KuROS 


ROBOS 


Bild 1. Der Demo-Level von »Robos Revenge« 
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C64 


Der Editor hat mehr zu bieten, als nur ein gewöhnliches 
Construction Set. Durch den Linkspfeil schalten Sie näm¬ 
lich im Spielfeld-Editor den Zeichensatz-Editor ein. So sind 
Sie nicht auf die vorhandenen Zeichen beschränkt, son¬ 
dern können sich auch eigene Muster einfallen lassen. Die 
einzige Einschränkung ist die Wirkung der Hindernisse. 
Auch werden sich die veränderten Zeichen weiterhin bewe¬ 
gen, wenn sie schon in der Urform als bewegte Zeichen 
gestaltet waren. 

Eigene Spielfelder 


Wenn Sie anfangen, mit dem Zeichensatz-Editor zu arbei¬ 
ten, erscheint links oben das bekannte Window mit allen 
Zeichen. Darin können Sie den Zeichensatz-Cursor bewe¬ 
gen. Rechts oben ist das Zeichen unter dem Cursor vergrö¬ 
ßert dargestellt. Wenn Sie die SPACE-Taste drücken, wech¬ 
seln Sie zum Editor-Cursor und können das Zeichen verän¬ 
dern. Für den Zeichensatz stehen Ihnen drei Grundfarben 


zur Verfügung, und in jedem Zeichen haben Sie eine frei 
wählbare Farbe. Durch die Tasten <1 > bis <4> setzt man 
ein farbiges Pixel. Um die Farbe, die Sie durch diese Taste 
erreichen, zu ändern, drücken Sie gleichzeitig die 
Commodore-Taste und die Zahlentaste. Beachten Sie bitte, 
daß Sie nur den Farbwert der Taste <3> für jedes Zeichen 
beliebig ändern dürfen. Mit der SPACE-Taste schaltet man 
zwischen dem Zeichensatz-Cursor und dem Editier-Cursor 
um. Durch <RUN/STOP> verlassen Sie den Zeichen¬ 
satz-Editor und kehren zum Spielefeld-Editor zurück. Um 
ins Hauptmenü zurückzukehren, drücken Sie nochmals 
die RUN/STOP-Taste. 

Bei der Funktion »Saven« erscheint keine Meldung oder 
Abfrage. Sie befinden sich trotzdem in der Speicherfunk¬ 
tion! Drücken Sie jetzt eine Zahlentaste (0 bis 9), und Ihr 
Spielfeld wird mit dieser Kennung gespeichert. Um ein 
Spielfeld zu laden, gehen Sie im Menüpunkt »3« genauso 
vor. Wollen Sie jedoch die Funktion Laden und Speichern 
nicht ausführen, drücken Sie nur eine Buchstaben-Taste. 

(R. Brandl/T. Schmidt/jk) 
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23c9 : 

cd 

11 

b3 

cd 

5a 

03 

ce 

da 

74 

2101 

8 d 

71 

03 

a9 

00 

8 d 

70 

03 

71 

2269 

dO 

02 

c6 

03 

c6 

02 

a5 

04 

67 

23dl : 

03 

ce 

58 

Od 

ce 

d8 

Od 

ce 

79 

2109 

8 d 

72 

03 

8 d 

73 

03 

8 d 

74 

bO 

2271 

dO 

02 

c6 

05 

c6 

04 

4c 

e3 

la 

23d9 : 

03 

2 a 

ce 

20 

34 

ce 

93 

7d 

ac 

2111 

03 

8 d 

75 

03 

aa 

aO 

08 

a9 

bc 

2279 

CC 

ad 

52 

03 

c9 

00 

dO 

Oa 

05 

23el : 

ce 

5f 

96 

ce 

36 

05 

ff 

cO 

eb 

2119 

97 

8 d 

31 

CC 

a9 

20 

8 d 

34 

97 

2281 

ad 

53 

03 

c9 

40 

dO 

03 

4c 

01 

23e9 : 

00 

80 

40 

00 

80 

40 

00 

80 

45 

2121 

cc 

bd 

UU 

yy 

ya 

UU 

ÜU 

eb 

eb 

2289 

e3 

CC 

ad 

52 

03 

dO 

03 

ce 

e8 

23f 1 : 

40 

00 

80 

40 

00 

80 

40 

00 

5f 

2129 

dO 

f7 

ee 

31 

cc 

ee 

34 

cc 

85 

2291 

53 

03 

ce 

52 

03 

20 

dO 

ce 

76 

23f9 : 

80 

40 

00 

80 

40 

00 

80 

40 

30 

2131 

88 

dO 

ee 

60 

20 

54 

CC 

20 

01 

2299 

4c 

86 

cd 

ad 

01 

dO 

18 

69 

lb 

2401 : 

00 

ff 

cO 

36 

23 

00 

02 

b3 

99 

2139 

a7 

f4 

4c 

90 

CC 

20 

54 

CC 

38 

22 al 

08 

c9 

el 

fO 

lb 

8 d 

01 

dO 

e8 











2141 

20 

d8 

ff 

4c 

90 

CC 

a9 

00 

6 d 

22a9 

a5 

02 

18 

69 

28 

85 

02 

90 

5a 











2149 

85 

c6 

c5 

c6 

fO 

fc 

ad 

77 

18 

22 bl 

02 

e6 

03 

a5 

04 

18 

69 

e8 

14 











2151 

02 

8 d 

98 

cc 

c9 

30 

30 

28 

09 

22b9 

85 

04 

a5 

05 

69 

03 

85 

05 

19 

Listing. »Robos 

Revenge« (Schluß) 


6^eR onuna—’» 







X>M’i 
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Vorsicht vor den Minen! 


In diesem Spiel sind Sie ein gefährlich lebender 
Abenteurer. Nur mit einem ungenauen Minen¬ 
detektor ausgerüstet, müssen Sie ein von hoch¬ 
explosiven Minen übersätes Feld überqueren. 
Eine High-Score-Liste auf Diskette gehört natür¬ 
lich auch dazu. Falls Sie kniffelige und ausge¬ 
fallene Strategiespiele lieben, ist »Minefield« 
genau das richtige. 

D er Name »Minefield«, wie dieses Spiel heißt, dürfte 
vielen bekannt sein, die schon einmal an einem Groß¬ 
rechner mit Unix-Betriebssystem gearbeitet haben. 
Minefield gehört nämlich mit zum Lieferumfang des 
Betriebssystems. Wer es einmal gespielt hat, den läßt es so 
schnell nicht mehr los. ' 

Zur Spielweise: Das Spielfeld besteht aus 30 mal 15 Fel¬ 
dern. Auf jedem Feld kann sich theoretisch eine (unsicht¬ 
bare!) Mine befinden. Wenn Sie auf eine derselben treten, 
fliegen Sie in die Luft. Der Spieler beginnt in der linken, obe¬ 
ren Ecke und muß zum Ausgang ganz rechts unten kom¬ 
men. Die Steuerung Ihrer Spielfigur wurde auf der Tastatur 
in Form eines Koordinatenkreuzes verwirklicht (Bild 1). 


Angenommen, Sie befinden sich gerade an der Position 
der 3. Das bedeutet, daß irgendwo um Sie herum drei 
Minen versteckt sind. In diesem Falle ist die Verteilung ein¬ 
deutig, da sowieso nur noch drei Felder in direkter Nähe frei 
sind (rechts oben, rechts in der Mitte und rechts unten von 
Ihrer Position aus gesehen). Also liegen dort auch die drei 
Minen, deren Signale Sie gerade empfangen. 

Spielstart 

Wenn das Programm mit RUN gestartet wurde, erscheint 
als erstes ein kleines Auswahlmenü. Beim ersten Start 
müssen anfangs die High-Score-Dateien auf der Diskette 
eingerichtet werden. Drücken Sie dazu <C>. Nach ein 
paar Sekunden erscheint wieder das Titelbild. 

Nun wollen wir spielen: Um mit der Zählweise etwas ver¬ 
traut zu werden, ist in Minefield ein Trainermodus einge¬ 
baut. Dieser bewirkt, daß alle Minen auf dem Bildschirm als 
Sternchen (*) angezeigt werden. Sie können so um die 
Minen herumgehen und die Anzäige Ihres Minendetektors 
beobachten. Wenn Sie den Ausgang rechts unten erreicht 
haben, werden Sie allerdings nicht in die High-Score-Liste 
aufgenommen (es sollte ja auch nur zum Üben sein). Der 
Trainermodus wird mit der Taste <T> ein- und aus¬ 
geschaltet. 


0 0 0 
0^0 
0 0 0 


:R nr 


Bild 1. Mit diesen 
Tasten bewegen 
Sie Ihre Spielfigur 
durch das gefähr¬ 
liche Minenfeld 


Sie können also nicht nur waagrecht und senkrecht zie¬ 
hen, sondern auch diagonal. Auf dem Feld, auf dem sich 
der Spieler gerade befindet, wird invers (hell auf dunkel) 
eine Zahl angezeigt. Diese Zahl ist die Anzeige Ihres 
Minendetektors. Sie können sich das so vorstellen: Jede 
Mine im Umkreis von einem Feld sendet ein Signal, das 
sich aber nicht genau orten läßt. Der Detektor kann nur 
messen, wie viele Signale eintreffen, sprich, wie viele 
Minen im Umkreis von einem Feld vorhanden sind. Um dies 
besser zu verstehen, sollten Sie Bild 2 betrachten. 


Die Schwierigkeitsgrade 

Es gibt vier Schwierigkeitsgrade: 1 - easy (leicht), 2 - 
medium (mittel), 3 - hard (schwer) und 4 - suicide (Selbst¬ 
mord) Abhängig von der gewählten Schwierigkeitsstufe 
wird" vom Programm die Anzahl an Minen festgelegt. Um 
bei Stufe 4 durchzukommen, müssen Sie schon einige Zeit 
gespielt haben. Um das Spiel zu starten, stellen Sie even¬ 
tuell den Trainermodus ein und drücken dann eine Taste 
von <1 > bis < 4 >. Nach ein paar Sekunden, in denen der 
C64 die Minen versteckt, wird das Spielfeld dargestellt, und 
es kann losgehen. 

Der Zeichenstift 

Als Hilfe steht Ihnen ein Zeichenstift zur Markierung von 
potentiellen Minen auf dem Bildschirm zur Verfügung: 
Drücken Sie < — > (Pfeil nach links). Mit den normalen 
Steuertasten kann jetzt eine Markierung über den Bild¬ 
schirm bewegt werden. Wenn Sie <S> drücken, wird an 
dieser Stelle eine Markierung gesetzt beziehungsweise 
gelöscht. Natürlich können Sie Markierungen nur auf Fel¬ 
der setzen, auf denen Sie noch nicht waren. Erneutes 
Drücken von < — > bringt Sie wieder in den normalen 
Spielmodus. Anhand dieser Markierungen läßt sich dann 
viel leichter ausrechnen, an welchen Stellen sich noch 
Minen befinden müssen. 



Bild 2. Eine typi¬ 
sche Spielsitua¬ 
tion. Auf welchen 
Feldern befinden 
sich denn nun die 
Minen? 


Spielende 

Wenn Sie den Ausgang rechts unten erreicht haben, 
bekommen Sie für jedes Feld, auf dem Sie waren, einen 
vom Schwierigkeitsgrad abhängigen Punkt. Auf Stufe 3 
zum Beispiel gibt es für jedes überlaufene Feld drei Punkte. 
Zusätzlich gibt es für jede vollständig eingekreiste Mine 
einen Bonus. Das bedeutet, daß rings um eine Mine kein 
Feld ausgelassen sein darf, außer, es befindet sich dort wie¬ 
der eine Mine (siehe Bild 3). 

Die hier als * eingezeichneten Minen sehen Sie im nor¬ 
malen Spielablauf natürlich nicht. Beide Minen gelten als 
vollständig eingekreist. Bei der Punktezählung würden Sie 
also zweimal einen Bonus erhalten. 
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Bild 3. Für voll¬ 
ständig einge¬ 
kreiste Minen gibt 
es bei der Punkte¬ 
zählung einen 
Bonus 


Dann lädt Minefield die High-Score-Liste von Diskette 
(was ein paar Sekunden dauert) und sieht nach, ob Sie sich 
eintragen dürfen. Wenn ja, dann können Sie Ihren Namen 
(maximal acht Zeichen) und das Datum eintragen. 
Anschließend wird die neue High-Score-Liste auf Diskette 
verewigt. 

Eingabehinweise 

Das Programm arbeitet sehr häufig mit Steuerzeichen 
(siehe Listing 1). Bitte lesen Sie zuerst unsere Eingabe¬ 
hinweise auf Seite 159 und eventuell unseren Tippkurs auf 
Seite 157 durch, bevor Sie mit dem Abtippen beginnen. 
Viel Spaß beim Spielen! (Gerti Noherr/tr) 


1 REM MINEFIELD <160> 

2 REM GESCHRIEBEN VON TR 2.10.86 FUER PLUS 

/4. C16 UND CI 16 <149> 

3 REM C64-VERSION TR 8.3.87 <111> 

5 DIM F%(31,16)= POKE 53280,6=P0KE 53281,1: 

POKE 650,128:POKE 788,52 <066> 

6 P(4)=.20:P(3)=.15=P<2)=.10:P(1)=.05 <085> 

7 T$(1>="CRVSON,SPACEXLRAININGMODECSPACE,R 

V0FF3" <143> 

8 T$(0 > ="C14SPACE>" <011> 

10 PRINT CHR$ <14 >"CCLR,DOWN,RIGHT,GREENlüi 

<ii4> 

20 PRINT“C2RIGHT3ADAPTED FOR £,64 BY TR" <170> 

30 PRINT"C2RIGHT38.3.87" <120> 

50 PRINT“C4DOWN,RIGHT,BLACK3JLELECT £EVEL=“ <049> 

51 PRINT ‘ CRTOHT <234> 

50 PRINT"CRIGIIT5 (4) ÄUICIDE <082> 

60 PRINT"CRIGHT>< 3) ÄARD <158> 

61 PRINT" CRIGHT}(2) ÜEDIUM <090> 

62 PRINT"CRIGHTX1) £ASY <201> 

63 PRINT“C2DOWN.RIGHT3CD 1RAININGMODE" <194> 

64 PRINT"CRIGHT3<JS,> £XIT TO £ASIC" <020> 

65 PRINT"CRIGHTX£> £REATE NEW HIGHSCORE-F 

ILES <062> 

66 GOSUB 1100 <038> 

70 GET K$:IF VAL(K$>> = 1. AND VAL(K$)<5 THEN 

30 <193> 

71 IF K$="X"THEN POKE 650,0-POKE 788,49:SY 

S 2048 <216> 

72 IF K$=“T“THEN TR=1-TR <037> 

73 PRINT"CHOME,14RIGHT>"T$<TR) <226> 

74 IF K$="C''THEN 3100 <098> 

75 GOTO 70 <045> 

80 PRINT"CHOME,RIGHT,21DOWN5MOMPLS...“:L=V 

AL(K$) <189> 

81 OPEN 1,8,15,"R:SCORES l.MFD=SCORES l.MF 

D“=INPUTttl,A.B$,C,D:CLOSE 1 <135> 

82 IF A=63 THEN 85 <188> 

83 PRINT"CCLR,DOWN,RIGHTXLHERE ARE NO HIGH 
SCORE-FILES ON THIS":PRINT"CRIGHTIDISK! 

!!":GOTO 1440 <050> 

85 AM=INT(P(L>*30*15>:PRINT AM"<UPI" <006> 

90 FOR 1=1 TO AM <017> 

100 X=INT(RND(1)*30>+l <244> 

110 Y=INT<RND(1>*15> + l <066> 

115 IF F%(X,Y)=l OR(X=2 AND Y=1)OR(X=30 AN 
D Y=14)OR(X=30 AND Y=15)OR(X=l AND Y=1 
)THEN 100 <016> 

120 F%(X,Y)=l=AM=AM-1:PRINT AM"CLEFT.SPACE 

,UP>":NEXT <201> 

121 FOR X=0 TO 31:F%<X,0)=2:F%(X,16)=2:NEX 

T <031> 

122 FOR Y=1 TO 15:F%(0,Y>=2=F%(31,Y>=2:NEX 

T <207> 

130 PRINT"CCLR>" <118> 

140 PX=1:PY=1:F%(30,15)=3 = F%(1,1)=3 <209> 

150 FOR Y=0 TO 14:POKE 1024+30+Y*40.93:NEX 

T <166> 

160 FOR X=0 TO 39:POKE 1024+X+15*40,64=NEX 

T:POKE 1024+30+15*40,113 <014> 

161 PRINT"CHOME,32RIGHT,DOWNDiEVEL"i <005> 

162 PRINT L=POKE 1024+29+14*40,88:G0SUB 11 

00 <109> 

163 PRINT"CHOME,27RIGHT,17DOWN,GREEN>£U££E 

■Ü&S" <064> 

164 PRINT"CHOME,29RIGHT,18D0WNIBY TRCBLACK 

3" <056> 

165 IF TR=1 THEN GOSUB 1000 <066> 

170 GOSUB 2000:POKE 1024+(PX-1)+40*(PY-1), 


AZ+176 <001, 

180 GOSUB 2200:IF F%(PX,PY>=1 THEN 1300 <174, 

185 IF PX=30 AND PY=15 THEN 1500 <000, 

186 IF FX(PX,PY)=0 THEN SC=SC + L,: F%( PX ,PY ) = 

3 <039> 

187 IF TR=0 THEN PRINT"CHOME,32RIGHT,3DOWN 

3"SC <045> 

190 GOSUB 2000:POKE 1024+<PX-1)+40*(PY-1), 

AZ+176 <021> 

200 GOTO 180 <000> 

1000 REM MINEN ANZEIGEN <207> 

1005 FOR Y=1 TO 15--FOR X=1 TO 30 <137> 

1010 IF F%(X,Y)=1 THEN POKE 1024+(X-l)+40* 

<Y-1>,42 <080> 

1020 NEXT X,Y <187> 

1030 IF TR=1 THEN PRINT"CHOME.8RIGHT,16DOW 

NX£RAININGMODE)- <149> 

1040 RETURN <082> 

1100 REM TASTENBELEGUNG <177> 

1102 PRINT"CHOME,32RIGHT,7DOWN3£EYS:“; <168> 

1104 PRINT“ CDOWN, 5LEFTIÜÜ*," i <073> 

1110 PRINT"CDOWN,5LEFT,RED3SC2SPACE3ÜC2SPA 

CE>£"; <254> 

1120 PRINT"CDOWN,7LEFT,3SPACE3cC3SPACE3"; <001> 

,113* -TRINT"CDOWN■ 7LEFT3 AM.+.M.P. " : <133> 

1140 i RINT"CDOWN,7LEFT.3SPACE>cC3SPACE3“: <021> 

1150 PRINT"CDOWN,7LEFT>£C2SPACE>&C2SPACE>£ 

CBLACK3" <082> 

1200 RETURN <242> 

1300 REM AUF MINE GETRETEN <132> 

1305 PRINT"CHOME,24DOWN3“i <215> 

1310 FOR 1=1 TO 200 <155> 

1315 PRINT"CUP,10RIGHT3S afiBflüB !CSHI 

FT-SPACE3!CSHIFT-SPACE3!“ <059> 

1316 PRINT" CUP, RVSON,10RIGHT3£ SflUBIlB 

!CSHIFT-SPACE3!CSHIFT-SPACE3!" <006> 

1320 GET A$:IF A$=""THEN NEXT <185> 

1334 POKE 1024+PX-1+40*(PY-1),170:POKE ige 

.0 <201> 

1335 IF TR=1 THEN 1360 <155> 

1340 PRINT"CHOME,RIGHT,23DOWN3ÄERE ARE THE 

REST OF THE MINES.“ <026> 

1350 GOSUB 1000:POKE 1024+PX-1+40*(PY-1>,1 

70 <015> 

1360 PRINT'CHOME, RIGHT, 23DOWN3£RESS < .B.E.T.u.R 

a>C17SPACE3" <242> 

1370 GET K$ : IF K$<>CHRS(13)THEN 1370 <124> 

1420 GOSUB 2400:GOSUB 2500 <024> 

1440 PRINT" C2DOWN, RIGHTXERESS < B.e.t.u,b,n, > - <i 3 4> 

1450 GET K$: IF K*OCHR*< 13 >THEN 1450 <192> 

1460 RUN <232> 

1500 REM GEWONNEN <167> 

1510 PRINT"CHOME,RIGHT,18DOWN3XOU MADE IT! 

<232> 

1552 IF TR=1 THEN GOSUB 2400-GOTO 1650 <108> 

1553 GOSUB 2700:SC=SC+BS <133> 

1554 PRINT"CHOME,33RIGHT,4DOWN,4SPACE5“ <224> 

1555 PRINT"CHOME,32RIGHT,3DOWN>"SC <122> 

1561 GOSUB 2400 <065> 

1562 FOR 1=1 TO 10:IF SC<HS(I)THEN NEXT:GO 

TO 1690 <197> 

1563 FOR X=9 TO I STEP-1:HS(X+1)=HS(X):HN$ 

(X+1)=HN$(X):HD$(X+1)=HD$(X):NEXT <005> 

1569 PRINT"CHOME,RIGHT,21DOWN>"; <123, 

1570 INPUT"£LEASE ENTER YOUR NAMEC4RIUHTJ. 

.C10LEFT}";HN$(I) <140> 

1575 IF LEN(HN$(I))>8 THEN 1569 <126> 

1576 IF LEN<HN$(I))<8 THEN HN$<I)=HNS(I)+" 

.":GOTO 1576 <166> 
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1580 

INPUT"CRIGHT>£LEASE ENTER DATEC5SPACE 


2520 

PRINT TAB(5-LEN(STRSCHSCI))))HS(I)" " 



.4RIGHT>00.00.0000C12LEFT0";HDS(X) 

<068> 


HNS(I)"C2SPACED"HDS(I) 

<184> 

1581 

IF LEN(HNS(I)><8 THEN HN$<I>=HN$<1)+" 


2530 

NEXT:RETURN 

<183> 


.":GOTO 1581 

<027> 

2600 

REM DISK-CHECK 

<184> 

1585 

IF LEN(HDS(I))<>10 THEN PRINT"C2UP1" : 


2610 

FS ="SCORES"+ STRS(L) + ".MFD" 

<123> 


GOTO 1580 

<076> 

2620 

OPEN 1,8,15,"R:"+F$+"="+F$ 

<034> 

1590 

HS(I)=SC 

<036> 

2630 

INPUT«,A,B$,C,D:CLOSE 1 

<064> 

1595 

GOSUB 2600 

<131> 

2640 

IF A=63 THEN RETURN 

<186> 

1600 

OPEN 1,8,15,"S:SCORES"+STRS(L)+".MFD" 


2641 

IF A<>62 THEN PRINT"CCLR,DOWN,RIGHT5S, 



:CLOSE 1 

<018> 


ISK-ERROR--"A;B$;C;D:GOTO 2681 

<102> 

1610 

OPEN 1,8.1."SCORES"+STRS(L > + ”.MFD,P,U 


2650 

PRINT"CCLR,DOWN,RIGHTDXNSERT filSK WIT 




<238> 


H XCOREFILES!" 

<068> 

1620 

FOR 1 = 1 TO 10 = GOSUB 1800 

<186> 

2660 

PRINT ” C2DOWN , RIGHTXERESS <B.e.t.u.b.n,> 

<084> 

1630 

PRINT« ,HX(I):PRINTtti ,HYS(I) :PRINTWl , 


2670 

GET K$:IF K$<>CHRS(13)THEN 2670 

<168> 


HZS <I> 

<103> 

2680 

GOTO 2620 

<248> 

1640 

NEXT CLOSE 1 

<127> 

2681 

PRINT"C2DOWN,RIGHT>£HECK DRIVE AND PR 


1650 

GOSUB 2500 

<170> 


ESS <B.E.T.U,B.N.> ! " :GOTO 2670 

<131> 

1660 

PRINT “ C2DOWN. RIGHT>£RESS <.b,e,t,u.b.n,> ■■ 

<100> 

2700 

REM BONUS FUER EINGEKREISTE MINEN 

<030> 

1670 

GET K$:IF KSOCHRS(13)THEN 1670 

<182> 

2710 

BS=0 = FOR Y=1 TO 15:FOR x=l TO 30 

<089> 

1680 

RUN 

<198> 

2720 

IF F% < X,Y > = 1 THEN 2740 

<108> 

1690 

GOSUB 2500 

<210> 

2730 

NEXT X.Y:RETURN 

<076> 

1700 

PRINT"CDOWN1XOUR XCORE IS"SC 

<013> 

2740 

IF F%(X-1,Y-l>=0 THEN 2730 

<052> 

1710 

GOTO 1660 

<158> 

2750 

IF F%(X,Y-1)= 0 THEN 2730 

<002> 

1800 

HX(I)=64-HS(I):HYS<I> = "":HZS(I) = “" 

<033> 

2760 

IF F%(X+l,Y-l)=0 THEN 2730 

<200> 

1810 

FOR N=1 TO 8:HYS(I)=HY$ (I)+CHRS(ASC(M 


2770 

IF F%(X+l,Y)=0 THEN 2730 

<207> 


ID$< HNS(I),N,1)) + L+N >:NEXT 

< 156> 

2780 

IF F%(X+1,Y+l)=0 THEN 2730 

<212> 

1820 

FOR N=1 TO 10:HZS <I)=HZ$ <I)+CHRS(ASC( 


2790 

IF F%(X,Y+l)=0 THEN 2730 

<040> 


MID$(HDS(I>,N.1))+L+N> :NEXT 

<217> 

2800 

IF F%(X-1,Y+1)=0 THEN 2730 

<104> 

1830 

RETURN 

<110> 

2810 

IF F%CX-1,Y>=0 THEN 2730 

< 119 > 

1900 

HS( I) =64-HX CI > : HNS < I > ='"': HDS < I) =" " 

<032> 

2830 

POKE 1024+(X-1)+40*<Y-1),42 

<030> 

1910 

FOR N=1 TO 8:HNS <I) = HNS(I)+CHRS(ASC< M 


2840 

BS=BS+2*L 

<041 > 


ID$(HYS(I),N,1))-L-N)sNEXT 

<139> 

2850 

PRINT"CHOME,32RIGHT.4DOWN3"BS:GOTO 27 


1920 

FOR N=1 TO 10 : HDS (I) =HD$ (I) +CHRS (ASC ( 



30 

<068> 


MIDSCHZSCI).N.l))-L-N>-NEXT 

<084> 

2900 

REM MARKIEREN 

<086> 

1930 

RETURN 

<210> 

2910 

MX=PX:MY=PY 

<179> 

2000 

REM BERECHNE ANZAHL MINEN 

<254> 

2920 

P=1024+(MX-1)+40*(MY-1):I=PEEK(P):POK 


2010 

AZ=0 

<240> 


E P.171 

<011> 

2020 

IF F7.CPX,PY-1> = 1 THEN AZ=AZ+1 

<187> 

2930 

GET KSdF K$<> " "THEN 2940 

<172> 

2030 

IF F%(PX+1,PY-1)=1 THEN AZ=AZ+1 

<091> 

2931 

N=N+1=IF N=10 THEN POKE P,I 

<053> 

2040 

IF F%(PX+1,PY)=1 THEN AZ=AZ+1 

<001> 

2932 

IF N=20 THEN POKE P,171:N=0 

<074> 

2050 

IF F%< PX+1.PY + 1)=1 THEN AZ=AZ+1 

<081> 

2933 

GOTO 2930 

<071 > 

2060 

IF F%(PX,PY+1)=1 THEN AZ=AZ+1 

<221> 

2940 

TF K$="W"AND MY>1 THEN MY=MY-l:GOTO 3 


2070 

IF F%(PX-1,PY+1>=1 THEN AZ=AZ+1 

<102>‘ ’ 


"50 

<012> 

2080 

IF F%(PX-1,PY)=1 THEN AZ=AZ+1 

<130> 

2950 

IF K$="E"AND MX<30 AND MY>1 THEN MX=M 


2090 

IF F%(PX-1.PY-1)=1 THEN AZ=AZ+1 

<154> 


X+l:MY=MY-1:GOTO 3050 

<112> 

2100 

RETURN 

<126> 

2960 

IF K$="D"AND MX<30 THEN MX=MX+l=GOTO 


2200 

REM STEUERUNG 

<211 > 


3050 

<055> 

2210 

GET K$:IF KS=""THEN 2210 

<216> 

2970 

IF K$=''C"AND MX<30 AND MY<15 THEN MX= 


2215 

POKE 1024+CPX-l)+40*<PY-l),AZ+48 

<022> 


MX+1= MY=MY+1:GOTO 3050 

<033> 

2220 

IF K$= "WAND PY>1 THEN PY=PY-1 : RETURN 

< 107> 

2980 

IF K$="X"AND MY<15 THEN MY=MY+l:GOTO 


2230 

IF K$="E"AND PX<30 AND PY>1 THEN PX=P 



3050 

<112> 


X+l:PY=PY-1:RETURN 

<152> 

2990 

IF KS="Z"AND MX>1 AND MY<15 THEN MX=M 


2240 

IF K$="D"AND PX<30 THEN PX=PX+1:RETUR 



X-l=MY=MY+1:GOTO 3050 

<080> 


N 

<187> 

3000 

IF K$="A"AND MX>1 THEN MX=MX-l:GOTO 3 


2250 

IF K$="C"AND PX<30 AND PY<15 THEN PX= 



050 

<044> 


PX+1:PY=PY+1:RETURN 

<054> 

3010 

IF K$="Q"AND MX>1 AND MY>1 THEN MX=MX 


2260 

IF K$="X"AND PY<15 THEN PY=PY+1:RETUR 



-1:MY=MY-1:GOTO 3050 

<014> 


N 

<244> 

3020 

IF KS="S"THEN 3060 

<090> 

2270 

IF K$="Z"AND PX>1 AND PY<15 THEN PX=P 


3030 

IF KS =" *- "THEN POKE P,I = RETURN 

<084> 


X-1:PY=PY+1:RETURN 

<247> 

3035 

POKE 53280,0:FOR N=1 TO 100:NEXT:POKE 


2280 

IF K$="A"AND PX>1 THEN PX=PX-1:RETURN 

<139> 


53280,6 

<127> 

2290 

IF K$="Q"AND PX>1 AND PY>1 THEN PX=PX 


3040 

GOTO 2930 

<178> 


-1 : PY=PY-1:RETURN 

<064> 

3050 

POKE P,I=GOTO 2920 

<010> 

2291 

IF KS = "«-"THEN GOSUB 2900:GOTO 2296 

<053> 

3060 

IF 1032 AND 1035 THEN 3035 

<057> 

2292 

POKE 53280.0: FOR 1 = 1 TO 100 NEXT: POKE 


3070 

IF 1=35 THEN POKE P,32:GOTO 2920 

<255> 


53280,6 

<066> 

3080 

POKE P,35:GOTO 2920 

<247> 

2296 

POKE 1024+(PX-1)+40* < PY-1),AZ+176 

<163> 

3100 

REM NEUE HIGHSCORE-FILES ANLEGEN 

<178> 

2300 

GOTO 2210 > 

<024> 

3105 

PRINT"CCLRDMOMPLS.. 

<224> 

2400 

REM HIGHSCORES LADEN 

<142> 

3110 

OPEN 1,8,15,“R:SCORES l.MFD=SCORES 1. 


2401 

PRINT"CHOME,20DOWN,RIGHT1MOMPLS...C5S 



MFD" 

<148> 


PACE>" 

<236> 

3120 

INPUTöl,A,B$,C,D:CLOSE 1:IF A=62 THEN 


2405 

GOSUB 2600 

<179> 


3200 

<150> 

2410 

OPEN 1,8,0,"SCORES"+STRS(L> + ".MFD,P,R 


3130 

IF A<>63 THEN PRINT"CDOWN,RIGHT>£ISK- 




<018> 


ERROR: "A-,B$;C;D:GOTO 1440 

<110> 

2420 

FOR 1 = 1 TO 10 INPUTftl ,HXCI> : GOSUB 246 


3140 

PRINT"CDOWN,RIGHTJÖIGHSCORE-FILES ALR 



0:GOSUB 1900 

<06B> 


EADY EXIST!" 

<166> 

2450 

NEXT:CLOSE 1=RETURN 

< 132> 

3150 

GOTO 1440 

<234> 

2460 

HY$(I> = "":FOR N=1 TO 8:GET«,AS = HYS(I 


3200 

FOR L=1 TO 4 

<148> 


>=HYS(I)+AS:NEXT:GET«,AS 

<002> 

3210 

OPEN 1,8,1,“SCORES"+STRS(L)+".MFD,P,W 


2470 

HZS(I)="“:FOR N=1 TO 10:GET«,AS:HZS( 



M 

<058> 


I) =HZ$ (I) +AS : NEXT : GET«, AS : RETURN 

<019> 

3220 

FOR 1=1 TO 10 : HS(I)=0 ; HNS(I)=". 


2500 

REM HIGHSCORES ANZEIGEN 

<000> 


.":HDS <I) ="00.00.0000":GOSUB 1800 

<131> 

2505 

PRINT"CCLR,DOWN,RIGHTJÜIGHSCORES XEVE 


3230 

PRINTtfl, HX< I) : PRINTttl, HYS (I) = PRINTK1, 



L"L 

<123> 


HZS(I) 

<179> 

2506 

PRINT" -CRIGHT •>.«■*.*.«.».».».». *,CDOWN > 


3240 

NEXT:CLOSE 1:NEXT:RUN 

<233> 


" 

<018> 




2510 

FOR 1=1 TO 10:IF HS<I>=0 THEN 2530 

<124> 

Listing 1. »Minefield«, bitte Eingabehinweise beachten 
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Fragen 

und Antworten 


Der C64 von außen 

Mich interessiert das Thema 
»Messen, Steuern, Regeln«. 
Welche Fähigkeiten in dieser 
Richtung besitzt der C64? 

(Dieter Maffei) 

Für die Steuerung externer 
Geräte ist vor allem der User- 
Port geeignet. Der User-Port 
stellt acht »Ein-/Ausgabeleitun- 
gen« zur Verfügung. An jede 
einzelne der acht Leitungen 
kann eine Spannung von etwa 
fünf Volt angelegt und damit 
ein Elektrogerät (das aller¬ 
dings nur einen sehr geringen 
Stromverbrauch besitzen 
darf!) ein- oder ausgeschaltet 
werden. Gesteuert wird der 
User-Port durch die CIA, einen 
Baustein des C64, der für die 
Ein-/Ausgabe zuständig ist. 
Durch das Setzen und 
Löschen einzelner Bits in ver¬ 
schiedenen CIA-Speicher- 
zellen kann der Zustand der 
acht Leitungen gezielt beein¬ 
flußt werden. Umgekehrt kann 
ein Programm durch Auslesen 
dieser Speicherzellen abfra- 
gen, ob an einer der acht Lei¬ 
tungen eine Spannung anliegt 
oder nicht. 

Der User-Port erlaubt nur die 
digitale Steuerung (Spannung 
angelegt/keine Spannung an¬ 
gelegt). Die Joystick-Ports ent¬ 
halten unter anderem je zwei 
Analogeingänge. Mit diesen 
Analogeingängen können Än¬ 
derungen (um genau zu sein: 
Widerstandsänderungen) in 
der »Umwelt« des C64 weitaus 
feiner abgestuft als mit dem 
User-Port erkannt werden. An 
diese Eingänge kann zum Bei¬ 
spiel ein lichtempfindlicher 
oder ein feuchtigkeitsemp¬ 
findlicher Widerstand ange¬ 
schlossen und der C64 als 
Licht- beziehungsweise Feuch¬ 
tigkeitsmesser verwendet wer¬ 
den. 

Dnidceiports 

Was ist eigentlich der Unter¬ 
schied zwischen dem An¬ 
schluß eines Druckers am 
seriellen Ausgang und dem 
Anschluß am User-Port? 

(Herbert Ziedler) 

Zwischen User-Port und 
seriellem Ausgang gibt es 
beim C64 wesentliche Unter¬ 
schiede. Ein Drucker, der mit 
dem seriellen Ausgang ver¬ 
bunden ist, kann ohne weiteres 
über die bekannten Basic- 
Befehle angesprochen werden 
(OPEN-Befehl, Geräteadresse 
4). Die Daten werden dann 
seriell, also bitweise hinterein¬ 
ander, an den Drucker gesen¬ 
det. Wird nun ein Drucker ver¬ 
wendet, der selbst eine Cen¬ 


tronics-Schnittstelle besitzt, 
kann dieser nicht direkt seriell 
angeschlossen werden. Diese 
Drucker sind für parallelen 
Datenempfang eingerichtet 
(immer 8 Bit gleichzeitig). Um 
auch diese Drucker mit dem 
seriellen Ausgang des C64 zu 
verbinden, ist ein spezielles 
Gerät (Interface) notwendig, 
das die Daten von seriell nach 
parallel umwandelt. Es besteht 
aber auch die Möglichkeit, 
parallel arbeitende Drucker 
direkt an den C64 anzuschlie- 
ßen. Dazu wird der User-Port 
benötigt. Um den Drucker 
anzusprechen, werden dann 
ein spezielles Kabel und ein 
entsprechendes Programm 
benötigt, das die Daten auf den 
User-Port umlenkt. Viele kom¬ 
merziell angebotenen Pro¬ 
gramme (Textverarbeitungen, 
Grafikprogramme) haben ein 
solches Steuerprogramm 
bereits eingebaut, so daß hier 
mit der Ansteuerung keine Pro¬ 
bleme auftreten. 

Datenfernübertragung 

Ist es möglich, mit dem C64 
Daten über das Telefonnetz 
zu übertragen? Kann man 
den C64 auf diese Weise mit 
anderen Computern verbin¬ 
den? Teilen Sie mir bitte auch 
mit, welche Geräte dazu 
erfoi'derlich sind und welche 
gesetzlichen Bestimmungen 
gelten. (Dirk Drechsler) 
Ja, es ist ohne weiteres mög¬ 
lich, mit dem C64 Daten über 
das Telefonnetz zu übertragen 
(DFÜ = Datenfernübertra¬ 
gung). Sie benötigen dazu 
einen Akustikkoppler, der die 
Daten für das Telefonnetz auf¬ 
bereitet und empfangene 
Daten wieder entschlüsselt. 
Zusätzlich benötigen Sie noch 
ein Terminalprogramm, das 
die Ansteuerung des Akustik¬ 
kopplers übernimmt. Dann 
steht Ihnen die Welt der Mail¬ 
boxen und öffentlichen Daten¬ 
banken offen. Sie brauchen 
nur noch die entsprechende 
Telefonnummer. Diese wird 
ganz normal gewählt. Sobald 
ein hoher Pfeifton ertönt, legen 
Sie den Hörer in die dafür vor¬ 
gesehenen Muscheln des 
Kopplers, und schon kann es 
losgehen. Eine Alternative zu 
den Akustikkopplern sind die 


Modems. Bis auf die Postmo¬ 
dems darf allerdings keines 
dieser Geräte an das Telefon¬ 
netz angeschlossen werden. 
Zu beachten ist, daß nur öffent¬ 
liche Datenbestände einge¬ 
sehen werden dürfen. Der Ver¬ 
such in eine nichtöffentliche 
Datenbank einzusteigen ist 
bereits strafbar. 


Datenbanken 

selbstgemacht? 

Welche Programmiersprache 
eignet sich am besten für die 
Programmierung einer lei¬ 
stungsfähigen Datei Verwal¬ 
tung? Kann dazu auch Basic 
herangezogen werden? 

(Jörg Ullink) 
Prinzipiell eignen sich ver¬ 
schiedene Programmierspra¬ 
chen für Dateiverwaltungen. 
Da wäre natürlich als erstes 
das gute alte Basic. Allerdings 
stoßen C j hier sehr schnell an 
die Grenzen des Interpreters 
im C64. Besser geeignet ist da 
schon das Basic des C128, 
welches über die nötigen 
Strukturanweisungen verfügt 
und leistungsfähigere Befehle 
zur Dateibehandlung bietet. 
Daneben gibt es natürlich 
noch so leistungsfähige Spra¬ 
chen wie Pascal, mit denen 
sich Dateien beinahe optimal 
verwalten lassen, da alle nöti¬ 
gen Befehle im Sprachumfang 
enthalten sind. Mit allen 
bekannten Programmierspra¬ 
chen entstehen jedoch meist 
nur sehr begrenzt anwendbare 
Dateiverwaltungssysteme. Viel 
flexibler zeigt sich hier eine 
programmierbare Datenbank 
wie etwa Superbase. Derartige 
Programme sind meist in 
Assembler geschrieben und 
speziell für ihr Anwendungsge¬ 
biet ausgelegt. Damit sind 
diese Programme meist 
schneller und auch komforta¬ 
bler als eigene Entwicklungen. 

Revolutionäre Sprache? 

ln letzter Zeit hört man immer 
wieder von der angeblich 
revolutionären Programmier¬ 
sprache C. Wie unterschei¬ 
det sich C von herkömmli¬ 
chen Sprachen? Ist C für den 
C64 erhältlich? 

(Hans Steppich) 


Die Sprache C ist eine der 
jüngsten Sprachen auf dem 
Markt. Besondere Bedeutung 
erlangte die Sprache, als ein 
Betriebssystem unter Verwen¬ 
dung von C erstellt wurde 
(Unix). Vor allem wegen des 
modularen Aufbaus hebt sich 
C von anderen Sprachen ab. 
Die Sprache selbst besteht nur 
aus 28 Schlüsselwörtern. 
Diese reichen aus, um sich 
weitere Befehle selbst zu pro¬ 
grammieren. Dadurch ist die 
Sprache sehr flexibel und kann 
auf nahezu jeden Anwen¬ 
dungsbereich zugeschnitten 
werden. Ähnlich wie in Pascal 
stehen auch die wichtigen 
Strukturanweisungen und 
Funktionen zur Verfügung. Ein 
weiterer Vorteil ist die für den 
Systemprogrammierer wich¬ 
tige Betriebssystemnähe der 
Sprache. Mit einiger Übung 
kann C teilweise sogar den 
bisher oft unumgänglichen 
Assembler ersetzen. Daneben 
bietet natürlich auch C die 
Möglichkeit, Maschinenpro¬ 
gramme in das Programm ein¬ 
zubinden. Die für den C64 
angebotenen C-Compiler hal¬ 
ten sich zwar nicht an den von 
den Entwicklern vorgegebe¬ 
nen Standard, doch ist bei den 
meisten eine ausreichende 
Untermenge implementiert. 
Zum Teil unterstützen die Com¬ 
piler für den C64 sogar die 
Musik- und Grafikprogrammie¬ 
rung, was ursprünglich nicht 
vorgesehen war. C ist heute 
bereits eine Sprache, die sich 
vor allem in Kreisen der 
Systemprogrammierer, aber 
langsam auch bei professio¬ 
nellen Anwendungen durch¬ 
setzt. Welche Compiler es für 
den C64 gibt, zeigt die Markt¬ 
übersicht Programmierspra¬ 
chen in Ausgabe 4/87 des 
64’er-Magazins. 


Kompatibilität 

Was versteht man eigentlich 
unter dem Ausdruck »kompa¬ 
tibel«? Dieser Begriff wird 
zwar ständig gebraucht, aber 
nie erklärt. (Hans Duschke) 
Kompatibilität ist eigentlich 
ein Begriff aus der Welt der 
Personal Computer. Seit 
jedoch der C128 auf dem 
Markt ist, findet sich dieser 
Ausdruck auch in der Welt der 
Heimcomputer. Ein Computer 
wird dann als kompatibel 
bezeichnet, wenn alle Pro¬ 
gramme eines anderen auch 
auf diesem Computer laufen. 
Dies ist beim C128 der Fall. 
Alle Programme des C64, bis 
auf die in allen Fällen auftre¬ 
tenden Ausnahmen, laufen 
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auch auf dem C 128 . Im 
Bereich der Software sind ent¬ 
sprechende Analogien zu fin¬ 
den. Erzeugt beispielsweise 
eine Textverarbeitung Dateien, 
die auch von einer anderen 
verwendet werden können, 
kann man ohne weiteres 
behaupten, die beiden Pro¬ 
dukte sind zueinander kompa¬ 
tibel. Genau ins Deutsche 
übersetzt bedeutet kompatibel 
soviel wie »zusammenpas¬ 
send«. 

Spezielle Roboter 

Ich habe schon viel von 
»Teach-in-Robots« gehört. 
Was versteht man darunter, 
und wie steuert man einen 
solchen Roboter mit einem 
Heimcomputer? 

(K.-H. Wender) 

Ein »Teach-in-Robot« ist ein 
Roboter, der in Grenzen lernfä¬ 
hig ist. Er merkt sich Bewegun¬ 
gen, die ihm vorgeführt werden 
und führt später die gleichen 
Bewegungen »selbständig« 
aus. Ein Beispiel: Sie bauen 
ein Modell, das über einen in 
allen Richtungen beweglichen 
Greifarm verfügt. Am Ende des 
Arms befindet sich ein Elektro¬ 
magnet. Das Modell (der 
»Roboter«) soll von einem Mün¬ 
zenstapel Münze für Münze 
abheben und auf ein »Fließ¬ 
band« legen. 

Um dem Roboter seine Auf¬ 
gabe beizubringen, verwen¬ 
den Sie den »Lernmodus«: Sie 
steuern den Roboterarm »per 
Hand« (zum Beispiel mit den 
Cursor-Tasten) und positionie¬ 
ren ihn auf dem Münzenstapel. 
Jede Bewegung des Arms 
dreht die Achsen von Potentio¬ 
metern, die an den Heimcom¬ 
puter angeschlossen sind (an 
den Joystick-Ports des C64). 
Ihr Programm merkt sich nun 
die aktuellen Potentiometer¬ 
werte, die die Armposition defi¬ 
nieren - Sie haben dem Robo¬ 
ter beigebracht, wo sich der 
Münzenstapel befindet. 

Auf die gleiche Weise steu¬ 
ern Sie den Arm zum Fließ¬ 
band. Das Programm merkt 
sich erneut die aktuellen 
Potentiometerwerte und kennt 
nun die Position des Fließ¬ 
bands. Im »Ausführungsmo¬ 
dus« steuert das Programm 
den Arm zur ersten gespei¬ 
cherten Position (dem Mün¬ 
zenstapel), schaltet den Elek¬ 
tromagneten ein, und eine 
Münze wird angezogen. An¬ 
schließend wird der Arm zur 
zweiten Position bewegt und 
der Elektromagnet ausge¬ 
schaltet - die Münze fällt auf 
das Fließband. Der Roboter 
führt die Bewegungen selb¬ 
ständig aus. 


Druckersdialter 

ln Ihren Druckertests lese ich 
ständig etwas über DIP- 
Schalter, kann mir aber nicht 
vorstellen, was diese Schal¬ 
ter genau für eine Bedeutung 
haben. 

(Michael Zehetner) 
Jeder Anwender kennt 
eigentlich die Probleme, die 
mit Druckern in Verbindung mit 
verschiedenen kommerziellen 
Programmen auftreten. Der 
Drucker vollführt hier mal 
einen unbeabsichtigten Sei¬ 
tenvorschub, druckt keine 
Umlaute oder bringt den Aus¬ 
druck mit doppeltem Zeilenab¬ 
stand zu Papier. Um nun diese 
Unannehmlichkeiten zu besei¬ 
tigen, braucht der Anwender 
eine Möglichkeit, den Drucker 
entsprechend anzupassen. 
Diese Anpassung läßt sich teil¬ 
weise durch die DIP-Schalter 
erreichen. Dabei handelt es 
sich um kleine Schalterchen, 
deren Stellung die Arbeit des 
Druckers direkt beeinflussen. 
Bei modernen Druckern kann 
hier vom Zeichensatz bis hin 
zur verwendeten Papierart 
(endlos oder Einzelblatt) jede 
Menge eingestellt werden. 
Sendet beispielsweise ein 
Textverarbeitungsprogramm 
nach jeder Zeile einen Zeilen-v 
Vorschub, wird dieser per DIP- 
Schalter am Drucker abge¬ 
schaltet, da dies ja bereits vom 
Programm aus erfolgt. Auf 
diese Weise läßt sich ein 
Drucker an die verschieden¬ 
sten Programme durch 
bestimmte Schalterstellungen 
ohne weiteres anpassen und 
wird somit zu einem flexiblen 
Ausgabegerät. 

Welcher Monitor? 

Wo liegt der Unterschied zwi¬ 
schen einem Maschinen¬ 
sprache- und einem Disket¬ 
tenmonitor? Ich schaffe es 
einfach nicht, mit einem Dis¬ 
kettenmonitor zu program¬ 
mieren, wie es mit einem ent¬ 
sprechenden Maschinen¬ 
sprachemonitor ohne weite¬ 
res möglich ist. 

(Herbert Lünger) 
Bei Maschinensprache- und 
Diskettenmonitoren handelt es 
sich um zwei prinzipiell ver¬ 
schiedene Programme. Wohl¬ 
gemerkt, Monitore in diesem 
Sinne sind nichts anderes als 
Maschinensprache-Program¬ 
me, die den Anwender befähi¬ 
gen, einen Einblick in die Spei¬ 
cherlandschaft des Computers 
oder der Diskette zu nehmen. 
Damit ist auch der große Unter¬ 
schied zwischen den beiden 
Monitoren bereits angespro¬ 


chen. Mit einem Maschinen¬ 
sprache-Monitor können Sie 
sich den Speicher des C64 an 
beliebigen Stellen betrachten 
und auch verändern. Ein derar¬ 
tiges Programm erlaubt auch 
die direkte Maschinenspra¬ 
che-Programmierung. Aller¬ 
dings vertiert man hierbei 
schnell die Übersicht, für kurze 
Routinen ist der Monitor aber 
ohne weiteres geeignet. Beim 
Diskettenmonitor erfolgt der 
Zugriff nicht auf den Speicher, 
sondern direkt auf die momen¬ 
tan eingelegte Diskette. Damit 
lassen sich, wie auch beim 
Maschinensprache-Monitor, 
die Inhalte des Datenträgers in 
Form von Hexadezimal-Zahlen 
auf dem Bildschirm darstellen. 
Gute Diskettenmonitore sind 
sogar in der Lage, zusätzlich 
zur hexadezimalen Darstel¬ 
lung die entsprechenden Zei¬ 
chen auf den Bildschirm zu 
bringen. Sogar die Befehle von 
Basic- oder Maschinenspra¬ 
che-Programmen werden mit 
angezeigt. Eine direkte Pro¬ 
grammierung ist damit nicht 
unbedingt möglich. Natürlich 
können Sie die Werte, die auf 
Diskette gespeichert sind, ver¬ 
ändern. Hier ist jedoch äußer¬ 
ste Vorsicht angebracht, da 
sehr schnell für die Disketten- 
organic-' on wichtige Daten 
zerstört werden, so daß die Dis¬ 
kette ohne genaue Kenntnisse 
über deren Aufbau nicht mehr 
verwendet werden kann. 

CP/M-Modul 

Ich habe für den C64 ein 
CP/M-Modul erworben. Nun 
würde mich interessieren, ob 
es damit möglich ist, dBase 
II, wie es für den C128 ange- 
boten wird, damit ablaufen 
zu lassen. Laufen auch die 
anderen angebotenen CP/M- 
Programme mit diesem 
Modul? (Dieter Hülsner) 
Informieren Sie sich als 
erstes über die vorliegende 
Versionsnummer des Be¬ 
triebssystems. Davon hängt 
die Einsetzbarkeit von CP/M- 
Programmen zu erheblichen 
Teilen ab. Die bekannten 
Module für den C64 arbeiten 
mit der CP/M-Version 2.2. 
Damit scheidet die dBase-ll- 
Version, die für den C128 
angeboten wird, aus, da diese 
für CP/M 3.0 gedacht ist. Für 
CP/M 2.2 gibt es auch lei¬ 
stungsfähige Produkte. Aller¬ 
dings treten Probleme mit den 
verwendeten Diskettenforma¬ 
ten auf. Während das Floppy- 
laufwerk 1571 beim C128 ohne 
weiteres in der Lage ist, ver¬ 
schiedene Formate zu verar¬ 
beiten, sind Sie beim C64 auf 


das Format der 1541 angewie¬ 
sen. Das wiederum bedeutet, 
daß die gewünschten Pro¬ 
gramme auf einer Diskette mit 
genau diesem Format vorlie¬ 
gen müssen. Zur Zeit ist kein 
Vertreiber bekannt, der CP/M- 
2.2-Programme auf diese 
Weise anbietet. 

Computer oder 
Schreibmaschine? 

Welche Vorteile hat eine Text¬ 
verarbeitung gegenüber der 
herkömmlichen Schreibma¬ 
schine, außer der ständigen 
Verfügbarkeit des Textes? 
Welche zusätzlichen Einrich¬ 
tungen werden benötigt, um 
ein solches Programm effek¬ 
tiv nutzen zu können? 

(Gerd Dörfner) 
Eine Textverarbeitung be¬ 
sitzt gegenüber einer her¬ 
kömmlichen Schreibmaschine 
sicherlich mehr Vorteile als die 
Wiederverwendbarkeit eines 
Textes. So kennen Sie sicher¬ 
lich das Problem mit den leidi¬ 
gen Tippfehlern. Entweder 
man korrigiert diese mit Tipp- 
Ex, was nicht zum Vorteil des 
Dokuments ausfällt, oder Sie 
schreiben das Ganze noch ein¬ 
mal von vorne. Eine Textverar¬ 
beitung enthebt Sie dieser 
Last, da es ein derartiges Pro¬ 
gramm erlaubt, Korrekturen 
von Tipp- oder Formulierungs¬ 
fehlern direkt am Bildschirm 
vorzunehmen. Auch das 
Löschen oder Einfügen belie¬ 
biger Texte ist problemlos mög¬ 
lich. Floskeln, wie etwa Anre¬ 
den oder Grußformeln, ja 
sogar ganze Textbausteine 
werden nur einmal geschrie¬ 
ben und dann über einfache 
Befehle oder Tastenkombina¬ 
tionen immer wieder von 
neuem von Diskette in den 
bestehenden Text eingefügt. 
Richtig ausnützen kann man 
die leistungsfähigen Pro¬ 
gramme natürlich erst, wenn 
der richtige Drucker zur Verfü¬ 
gung steht. Je nach Ausstat¬ 
tung kann der geschriebene 
Text auch optisch verfeinert 
werden, etwa durch Fettschrift, 
Kursivdruck, Unterstreichun¬ 
gen, Schmalschrift etc. Auch 
sind Sie in der Lage Serien¬ 
briefe zu drucken, wobei Sie 
festlegen können, wie oft 
der Brief gedruckt oder ob 
Textbausteine während des 
Drückens eingefügt werden 
sollen. Sie sehen also, daß 
eine Textverarbeitung im 
Zusammenspiel mit den ent¬ 
sprechenden Zusatzgeräten 
die Schreibmaschine nicht nur 
ersetzen, sondern auch bei 
weitem übertreffen kann, was 
die Leistung angeht. 
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Computer-Lexikon 


Oft gesucht und selten gefunden - eine ausführ¬ 
liche Übersicht über die wichtigsten und ge¬ 
bräuchlichsten Begriffe rund um den Computer. 

Akkumulator (engl. Accumulator) 

Ein spezielles Register eines Prozessors, in dem die mei¬ 
sten logischen Rechenoperationen durchgeführt werden. 

Akustikkoppler (engl. Acoustic coupler) 

Ein Akustikkoppler (Bild 1) ist eine spezielle Variante 
eines Modems. Wie auch das Modem wandelt der Akustik¬ 
koppler binäre (Computer-)Signale und Informationen in 
elektroakustische Signale um und umgekehrt. Der Akustik¬ 
koppler ist dabei zwischen Computer und Telefonnetz 
geschaltet, wobei die Verbindung zur Telefonleitung über 
den Telefonhörer hergestellt wird. Hör-und Sprechmuschel 
des Telefonhörers werden schallgedämpft in die Gummi¬ 
manschetten des Kopplers gelegt. In den Manschetten 
befinden sich ein Mikrofon und ein Lautsprecher, über die 
akustische Signale empfangen und gesendet werden. Die 
Datenübertragung mittels Akustikkoppler ist wegen der 
zusätzlichen elektrisch-akustisch-elektrischen Umwand¬ 
lung wesentlich störanfälliger als bei einem Modem. 





Bild 1. Ein handelsüblicher Akustikkoppler 


Algorithmus (engl, algorithm) 

Es gibt verschiedene Methoden, eine Aufgabe zu lösen. 
Ein Algorithmus ist ein Verfahren zur Lösung eines Pro¬ 
blems, das nach endlich vielen Schritten abbricht und 
dabei entweder eine Lösung des Problems produziert hat 
oder das Problem als unlösbar zurückweist. 

Auch wenn Algorithmen als »effektive Verfahren« 
bezeichnet werden, müssen sie keineswegs immer effi¬ 
zient sein. Ein Beispiel-Algorithmus zum Gedichteschrei¬ 
ben etwa könnte alle erdenklichen Kombinationen aus 
Buchstaben und Satzzeichen bis zu einer vorgegebenen 
Länge von 500 Zeichen bilden. Die Anzahl der Möglichkei¬ 
ten ist zwar ungeheuer groß, aber endlich. Alle Möglichkei¬ 
ten könnten unter erheblichem Aufwand mit einem solchen 
Algorithmuserzeugt werden. Man erhält dadurch zwar jede 
Menge Unsinn, aber garantiert auch alle möglichen 
Gedichte mit 500 Zeichen Länge. 

In der EDV charakterisiert man diese Methode als »brute- 
force« (etwa: mit roher Kraft). 


Adresse (engl, address) 

Die Adresse gibt an, an welcher Stelle sich bestimmte 
Daten in einem Computerspeicher befinden (vergleichbar 
etwa mit Hausnummern in einer langen Straße). Die Spei¬ 
cherplätze sind durchnumeriert, wodurch ihnen Adressen 
zugeteilt werden, über die auf den Inhalt zugegriffen wer¬ 
den kann. 

Alphanumerische Zeichen (engl, alphanumeric) 
Darunter versteht man alle Zeichen, die ein Computer 
auf einer Ausgabeeinheit (zum Beispiel Bildschirm oder 
Drucker) darstellen kann; zumindest aber das Alphabet 
und die Dezimalzahlen. 

ALU (engl, arithmetic logic unit) 

Die »arithmetisch-logische Einheit« ist der für die Durch¬ 
führung sämtlicher Rechenoperationen verantwortliche 
Teil eines Prozessors. 

Anweisung (engl. Statement) 

Ein einzelner oder zusammengesetzter Ausdruck inner¬ 
halb eines Programms, der dem Computer mitteilt, was er 
ausführen soll. 

Anwendungsprogramm (engl, applications program) 

Ein »Dienstleistungsprogramm« mit meist speziellem 
Anwendungsbereich (Textverarbeitung, Datenverwaltung), 
im Geqensatz zu einem Systemprogramm, mit dessen 
HilfeL.iter anderem auch Anwendungsprogramme erstellt 
werden können. 

ASCII (engl, american Standard Code for information inter- 
change) 

Ein Standardcode, der 128 Zeichen (Zahlen, Buchsta¬ 
ben, Symbole, Sonderzeichen) ein aus sieben Bit beste¬ 
hendes Muster zuweist. Dieser Standard erleichtert die 
Kommunikation verschiedener Programme, Computer und 
Peripheriegeräte (Drucker). 

Assembler 

1. Eine maschinenorientierte Programmiersprache, die 
von Prozessor zu Prozessor unterschiedlich ist. Assem¬ 
blerprogramme können nur zusammen mit »ihrem« Pro¬ 
zessortyp laufen, im Gegensatz zu den höheren Program¬ 
miersprachen, die unabhängig von dem eingesetzten 
Mikroprozessor sind. Assemblerprogramme nutzen die 
Fähigkeit des entsprechenden Prozessors optimal aus, 
auch wird - im Vergleich etwa zu Basic - nur sehr wenig 
Speicherplatz belegt und die Programme sind zudem sehr 
schnell. Aus diesem Grund werden Assemblerprogramme 
bei zeitkritischen Prozessen auch in Programme, welche in 
einer höheren Programmiersprache geschrieben sind, ein¬ 
gebunden. 

2. Übersetzungsprogramm, welches ein in Assembler¬ 
code vorliegendes Programm (Quellcode) in den binären, 
also direkt ablauffähigen Maschinencode umwandelt. 
Dabei werden die Assemblerbefehle (auch »Mnemonics« 
oder »Opcodes« genannt) auf syntaktische Fehler über¬ 
prüft. 

Auflösung (engl, resolution) 

Mit »Auflösung« oder »Bildauflösung« bezeichnet man 
die maximale Anzahl optisch voneinander unterscheidba¬ 
rer Punkte, die auf einer Fläche dargestellt werden können. 
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Angegeben wird die Auflösung in Pixels. Pixel ist ein 
Kunstwort aus dem englischen »picture element«, zu 
deutsch »Bildpunkt«. 

Grafikcomputer höchster Auflösung können 4096 x 4096 
Pixels darstellen, im Bereich der Heimcomputer sind etwa 
320 x 160 Pixels der Standard. 

BAM (engl, block availability map) 

Die BAM ist ein Verzeichnis der freien und belegten Sek¬ 
toren (Blöcke) auf einer Diskette. Für jeden Block ist ein Bit 
reserviert. Steht dieses Bit auf logisch 1, so ist der entspre¬ 
chende Block frei. Wird nun eine Datei auf die Diskette 
geschrieben, so belegt diese natürlich einen oder mehrere 
Blöcke. Damit das DOS weiß, welche Blöcke auf einer Dis¬ 
kette belegt sind, werden diese in der BAM als belegt 
gekennzeichnet, indem das entsprechende Bit auf 0 
gesetzt wird. 

Die BAM steht bei den Commodore-Laufwerken 1541 
und 1570 auf Spur 18, Sektor 0; bei der 1571 auf den Spuren 
18 und 53, Sektor 0. Es wird nur etwa die Hälfte des Sektors 
von der BAM belegt, der andere Platz wird unter anderem 
für Diskettenname, Formatkennung etc. benutzt. 

BDOS, BIOS, CCP 

Aus diesen drei Grundelementen setzt sich CP/M zusam¬ 
men. Das BDOS (Basic Disk Operating System) besteht 
aus einer Vielzahl einzelner Funktionen, welche den 
Datenfluß zwischen dem eigentlichen Anwenderprogramm 
und den verschiedenen Ein-/Ausgabegeräten steuern. Das 
BIOS (Basic Input/Output System) übernimmt die Daten 
vom BDOS und leitet den Datentransfer in die Wege. Der 
CCP (Control Command Processor) ist für die Eingaben 
des Anwenders zuständig. Er stellt unter anderem fest, ob 
ein residenter oder transienter Befehl aufgerufen wurde 
(Zur Ausführung eines transienten Befehls wird vor der 
Ausführung die entsprechende .COM-Datei von Diskette 
geladen). 

Das Wort »Basic« im Zusammenhang mit BDOS und 
BIOS hat nichts mit der gleichnamigen Programmierspra¬ 
che zu tun, sondern steht für »grundlegend«. 

Befehl (engl, instruction) 

Kommandoanweisung, die einen Computer bestimmte 
Operationen ausführen läßt. Auch Zuweisungen sind 
Befehle. So ist bei der Basic-Zuweisung »A=7x5« die 
rechte Seite »7x5« ein Ausdruck, dessen Wert (35) der 
Variablen »A« zugewiesen wird. 

Es gibt auch Programmiersprachen, die gänzlich ohne 
Befehle auskommen, sogenannte »funktionale Sprachen«, 
welche nur Ausdrücke kennen, wie zum Beispiel Lisp. 

Betriebssystem (engl, operating System) 

Ein Programm, das die Fähigkeiten eines Computers so 
organisiert, daß Anwendungsprogramme lauffähig und 
damit benutzbar werden. Das Betriebssystem zählt zur 
Systemsoftware. Es befindet sich entweder bereits fest ein¬ 
gebaut im Computer-ROM oder wird bei jedem Einschalten 
des Systems von Diskette geladen. 

Binär (engl, binary) 

Ein Zahlensystem mit der Basis zwei, bei dem die Zahlen 
nur durch Kombinationen der Ziffern 0 und 1 dargestellt 
werden. Da sich diese Zahlen leicht in einem Entweder- 
Oder-Schema darstellen lassen (Strom fließt, Strom fließt 
nicht), wurde das binäre Zahlensystem zum Charakteristi¬ 
kum digitaler Computersysteme. 

Bit (engl, binary digit) 

Kleinste informationstragende Darstellungseinheit im 


binären Zahlensystem. Das Binärzeichen kann nur zwei 
Zustände annehmen, die meist mit 0 (für »falsch«, »nein«, 
»kein Strom«) und 1 (»wahr«, »ja«, »Strom«) bezeichnet 
werden. 

Bit/s 

Bit pro Sekunde ist eine Maßeinheit für die Geschwindig¬ 
keit, mit der Daten übertragen werden. Oft spricht man in 
diesem Zusammenhang auch von »Baud« beziehungs¬ 
weise der »Baud-Rate«. Baud ist aber eine veraltete 
Maßeinheit. 

Die Ausgabe in bit/s gibt nur Auskunft über die Geschwin¬ 
digkeit des Informationsflusses und darf nicht mit der 
Anzahl der übertragenen Zeichen gleichgesetzt werden, 
da sich ein Zeichen aus mehreren Bits zusammensetzt. 
Außer den 7 oder 8 Datenbit, die benötigt werden, um ein 
Zeichen darzustellen, müssen noch ein Startbit und ein 
oder zwei Stoppbits sowie unter Umständen ein Paritätsbit 
übertragen werden. Als Faustregel gilt: Tatsächliche Über¬ 
tragungsrate = (bit/s) /10. Kürzel geben Auskunft über die 
zur Übertragung eines Zeichens notwendigen Bits; so 
bedeutet »8n1« zum Beispiel 8 Datenbits, kein Paritätsbit 
und 1 Stoppbit. 

Bus 

Datenübertragender Kommunikationspfad zwischen 
den verschiedenen Bestandteilen eines Computersystems. 
Ein Bus kann verborgen sein (beispielsweise als Bestand¬ 
teil einer integrierten Schaltung) oder frei zugänglich, um 
Peripheriegeräte oder Erweiterungsplatinen aufzuneh¬ 
men. Besonders für diesen Zweck ist ein Bus in Mikro¬ 
computersystemen von besonderer Bedeutung, da durch 
ihn eine einheitliche Schnittstelle für die Systemerweite- 
runger definiert wird. 

Byte, KByte 

Ein Byte ist eine aus 8 Bit zusammengesetzte Informa¬ 
tionseinheit, mit der sich jeder Wert zwischen 0 und 255 
darstellen läßt. 

Ein »Wort« ist aus zwei, ein Langwort (»long word«) aus 
vier Byte zusammengesetzt; ein Nibble umfaßt ein halbes 
Byte (4 Bit). 

Ein KByte besteht aus 1024 Byte. 

Der C64 besitzt 64 KByte RAM (das sind 65536 = 64 x 
1024 Byte). 

Centronics-Schnittstelle 

Parallele Schnittstelle (Bild 2) speziell zum Anschluß von 
Druckern. Diese von der Firma Centronics entwickelte 
Schnittstelle wurde von vielen Herstellern übernommen 
und kann somit als inoffizielle Norm bezeichnet werden. 
Die Centronics-Schnittstelle zeichnet sich vor allem durch 
relativ geringen Hardwareaufwand aus, da zur Verbindung 
von zwei Geräten, an denen Centronics-Anschlüsse beste- 



Bild 2. Die Centronics-Parallel-Schnittstelle 
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hen, nur ein 36poliges Kabel mit entsprechenden Steckern 
benötigt wird. 

Chip 


gespeicherten Informationen möglich ist. Man unterschei¬ 
det dabei hauptsächlich zwischen sequentiellem und 
direktem Zugriff beziehungsweise sequentiellen und relati¬ 
ven Dateien. 



O Ein Chip ist ein rechteckiges Siliziumplättchen, welches 
nach diversen Herstellungsprozessen bestimmte elektri¬ 
sche Funktionen erfüllt. In Computern findet man diese 
Chips in den integrierten Schaltkreisen (ICs), wo sie die ver¬ 
schiedensten Funktionen erfüllen können (Mikroprozesso¬ 
ren, Speicher- und Logikbausteine, Bild 3). 


Datei, relative 

Bei der relativen Datenspeicherung wird davon ausge¬ 
gangen, daß jede Datei aus vielen Einträgen besteht, die 
alle eine gewisse Maximallänge nicht überschreiten. Für 
jeden Eintrag, dessen Größe der Benutzer vorher definiert, 
wird ein eigener Datensatz (»Record«) angelegt, auf den 
bei späterer Bearbeitung direkt zugegriffen werden kann. 
Oft wird zusätzlich in einer sequentiellen Datei, der soge¬ 
nannten »Indexdatei«, festgehalten, wo (physikalisch) ein 
bestimmter Datensatz auf der Diskette zu finden ist. Auf 
diese Weise kann man sehr schnell auf jeden Datensatz 
zugreifen, denn die Indexdatei kann ständig im Computer- 
RAM verbleiben. Außerdem kann so recht schnell sortiert 
werden, denn man braucht ja nicht die eigentlichen Daten, 
sondern nur die Indexdatei nach den gewünschten Krite¬ 
rien zu sortieren. 


Bild 3. Eine Computerplatine (C64) mit Chips 
Compiler (Übersetzer) 

Ein Computerprogramm, das ein in einer Hochsprache 
(wie Basic oder Pascal) geschriebenes Programm in 
Maschinensprache übersetzt, das heißt, in das Befehlsfor¬ 
mat des Mikroprozessors umwandelt. 

Solche »compilierten Programme« sind in der Ausfüh¬ 
rung wesentlich schneller als »interpretierte«. 


Datei, sequentielle 

Organisationsform für Dateien, bei der die einzelnen 
Datensätze auf dem Speichermedium hintereinander 
abgelegt sind. Diese Methode ist immer dann angezeigt, 
wenn die Datei Informationen enthält, die stets in der glei¬ 
chen Reihenfolge (von »vorne« nach »hinten«) gelesen wer¬ 
den müssen (zum Beispiel Programme). Der Nachteil der 
sequentiellen Datei besteht darin, daß man nicht auf einen 
bestimmten Eintrag willkürlich zugreifen kann, sondern 
solange »der Reihe nach« suchen muß, bis man den Ein¬ 
trag gefunden hat. Das Auffinden weiter »hinten« liegender 
Daten dauert natürlich länger als die weiter »vorne« liegen¬ 
der. Außerdem ist bei diesem Dateityp ein Schreiben neuer 
Informationen nur hinter dem Ende der zuletzt gespeicher¬ 
ten Daten möglich. Sollen die Daten auf Band (Datasette) 
geschrieben werden, ist nur die sequentielle Organisa¬ 
tionsform möglich. 


CP/M (engl. Control Program for Microcomputers) 

CP/M ist ein diskettenorientiertes Betriebssystem und 
wurde 1975 von Gary Kildall/Digital Research für Computer 
mit Intel 8080-Prozessoren entwickelt. Heutzutage wird in 
CP/M-Computern fast ausschließlich der Zilog-Z-80-Pro- 
zessor verwendet, wie auch im Commodore C128. CP/M ist 
leicht auf verschiedenen Geräten zu installieren, was durch 
Trennung aller computerspezifischen Routinen von der 
eigentlichen Verwaltungslogik erreicht wird. Hardware¬ 
abhängige Teile sind im BIOS untergebracht, der logische 
Teil des Systems befindet sich im BDOS. Innerhalb einer 
CP/M-Version (zum Beispiel CP/M 3.0) ist das BDOS auf 
allen Computern identisch, das BIOS jedoch hardware¬ 
abhängig. Soll CP/M auf einem anderen Computer mit 
Z-80-Prozessor installiert werden, so ist lediglich das BIOS 
entsprechend abzuändern. 


Datex-P 

Datex-P ist ein Datenübertragungsnetzwerk, welches 
1980 von der Deutschen Bundespost eingerichtet wurde. 
Bedingt durch die spezielle Art der Datenübermittlung 
(Paketvermittlung, daher auch das »P« hinter Datex) ist die 
Übertragung hier günstiger als über das Telefonnetz. 

Datex-P nimmt die notwendigen Anpassungen der Com¬ 
puter untereinander selbst vor, dies betrifft besonders die 
Übertragungsgeschwindigkeit. 

Für Datex-P benötigt man neben der »üblichen« DFÜ- 
Ausrüstung (Computer, Terminalprogramm, Akustikkopp¬ 
ler, Telefon) noch eine Benutzerkennung für Datex-P 
(»Nüi«, Network User Identification) und die Nummer des 
gewünschten Computers im Datex-P-Netz (»NUA«, Net¬ 
work User Adress). Die NUI kann bei der Post beantragt 
werden und kostet 15 Mark im Monat Grundgebühr zuzüg¬ 
lich Kosten der Verbindungen. 


Datei (engl, file) 

Eine Datei ist eine Sammlung von zusammengehören¬ 
den Informationen, die gemeinsam gespeichert sind. Für 
den Computer stellt eine Datei nichts anderes als eine Ver¬ 
waltungseinheit dar. Der Computer legt die Datei in einem 
bestimmten Format auf Diskette beziehungsweise Kas¬ 
sette an. CP/M-Dateien auf einer Diskette bestehen bei¬ 
spielsweise aus Datensätzen (»Records«) zu je 128 Bytes, 
Dateien auf dem 1541-Laufwerk von Commodore stehen in 
256-Byte-Blöcken (»Blocks«) auf der Diskette. 

Eine für den Benutzer wichtige Unterscheidung der 
Dateien ergibt sich aus der Art des Zugriffs, der auf die 


DFÜ 

Unter DFÜ (Abkürzung für Datenfernübertragung) ver¬ 
steht man die Übermittlung von Daten über weite Entfer¬ 
nungen. Dies kann über das Telefonnetz geschehen, aber 
auch drahtlos (Beispiel: RTTY, Funkfernschreiben). Über 
das Telefonnetz stehen gleich eine ganze Reihe von Mög¬ 
lichkeiten zur Verfügung: Datex und Bildschirmtext, zwei 
Dienste der Deutschen Bundespost, und natürlich jede 
Menge elektronischer Briefkästen, sogenannte Mailboxen, 
welche meist privat, teilweise aber auch kommerziell 
betrieben werden. Die Hobby-DFÜ mit Heimcomputern hat 
in letzter Zeit viele Freunde gewonnen. 
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Um DFÜ zu betreiben, muß der Anwender seinen Com¬ 
puter mit dem Übertragungsmedium, also meist mit dem 
Telefonnetz, verbinden. Hierzu gibt es spezielle Geräte, 
sogenannte »Modems« und »Akustikkoppler« sowie spe¬ 
zielle Steuersoftware (Terminalprogramme). 

Dialog 

Mit Computern kann man auf zwei verschiedene Arten 
kommunizieren: im Stapel-Verfahren und im Dialogver¬ 
fahren. 

Beim Stapelverfahren gibt der Anwender die notwendi¬ 
gen Daten hintereinander ein und erhält nach einiger Zeit 
das Ergebnis. Dieses Verfahren bezeichnet man auch als 
Batch-Betrieb. 

Beim Dialog-Verfahren reagiert das System sofort auf die 
einzelne Dateneingabe, das heißt, es findet ein ständiger 
Wechsel zwischen Eingabe (durch den Anwender) und 
Ausführung (durch den Computer) statt. Der Dialog wird 
dabei durch das Programm gesteuert. 

Directory (Disketteninhaltsverzeichnis) 

Einer der vielen Vorteile der Diskette gegenüber der Kas¬ 
sette besteht darin, daß sie ein Inhaltsverzeichnis enthält. 

Dieses Verzeichnis ermöglicht es, festzustellen, wie viele 
und welche Dateien auf der Diskette enthalten sind, wieviel 
Platz sie benötigen und ob noch Platz für weitere Dateien 
ist. 

Direktzugriff 

Der Zugriff (engl, direct access) ist die Art, in der einzelne 
Speicherzellen eines Datenträgers »aufgesucht« werden. 
Bei Commodore-Diskettenlaufwerken versteht man unter 
Direktzugriff die Möglichkeit, auf einen bestimmten Block 
der Diskette direkt zugreifen zu können, ohne die Datei, in 
der der Block steht, vorher laden zu müssen. Das einge¬ 
baute DOS der Commodore-Laufwerke stellt eine ganze 
Reihe von Befehlen zur Verfügung, mit denen ein direkter 
Zugriff verhältnismäßig einfach zu realisieren ist. Beim Pro¬ 
grammieren muß man jedoch sehr sorgfältig Vorgehen, da 
auf DOS-Ebene die Befehle keiner Überprüfung unterlie¬ 
gen: Gibt man etwa die Anweisung, auf Spur 90 etwas zu 
lesen oder zu schreiben, so versucht das DOS auch, den 
Schreib-/Lesekopf des Diskettenlaufwerks dort zu positio¬ 
nieren, obwohl gar keine Spur 90 existiert. 

Diskette 

auch »Floppy-Disk« genannt. Floppy heißt im Englischen 
soviel wie »schlaff« oder »schlotterig«. Eine Diskette (Bild 4) 


ist ein sehr preisgünstiges Speichermedium, das aus einer 
flexiblen (daher: »floppy«) Kunststoffscheibe mit magneti¬ 
sierbarer Oberfläche besteht. Eine steife Hülle aus Plastik 
gibt der Diskette Stabilität und schützt ihre Oberfläche. Die 
Hülle läßt lediglich die für die Funktion notwendigen Berei¬ 
che (Schreib-/Leseöffnung, Indexloch) frei. Die im Heim¬ 
computerbereich üblichen Formate sind 5V» und 3 V 2 Zoll. 
Bei Disketten vom Format 3 V 2 Zoll und kleiner fällt jedoch 
die Biegsamkeit des Datenträgers, die diesem den Namen 
gegeben hat, weg. Hier befinden sich die Magnetplatten in 
festen Plastikgehäusen. Disketten werden in Diskettenlauf¬ 
werken betrieben. Ihr Vorteil gegenüber Magnetbändern 
besteht in einem direkten Zugriff auf die gespeicherten 
Daten. 

Diskettenarten 

Es gibt grundsätzlich zwei Arten von Disketten: einsei¬ 
tige und doppelseitige. Um eine doppelseitige Diskette nut¬ 
zen zu können, benötigen Sie auch ein entsprechendes 
Diskettenlaufwerk mit zwei Schreib-/Leseköpfen, wie zum 
Beispiel die Commodore 1571. Eine mit »SS« (»single 
sided«) gekennzeichnete Diskette ist nur auf einer Seite 
geprüft, eine mit »DS« (»double sided«) gekennzeichnete 
hingegen auf beiden Seiten. Für die Güte eine Diskette gibt 
es noch die Angabe der Datenschreibdichte: Hierfür ste¬ 
hen die Buchstabenkombinationen »ID« oder »SD« (für 
»single density«, einfache Dichte), »2D« oder »DD« (für 
»double density«, doppelte Dichte) und »HD« (für »high den¬ 
sity«, vier- oder mehrfache Dichte). Ein weiteres Gütemerk¬ 
mal ist die Spurdichte, welche 24,48 oder 96 tpi (tracks per 
inch) betragen kann. 

Diskettenmonitor 

Ein ■ 1 skettenmonitor ist ein Programm, das es dem 
Anwender ermöglicht, Manipulationen direkt auf der Dis¬ 
kette vornehmen zu können. 

Das Prinzip ist folgendes: Dem Diskettenmonitor wird die 
Adresse des gewünschten Blocks angegeben, meist in 
hexadezimaler Form. Beispiel: Für den Block, in dem die 
BAM steht (Spur 18, Sektor 0) wäre dies $12 $00. Der Disket¬ 
tenmonitor liest den gewünschten Block direkt von der Dis¬ 
kette in das RAM. Nun kann man den Block auflisten, 
anschauen, verändern und natürlich (in der geänderten 
Form) wieder auf die Diskette zurückschreiben lassen. 
Durch Änderung der entsprechenden Bytes in der BAM 
oder dem Directory können zum Beispiel Dateien oder 
ganze Disketten vor Löschen oder Überschreiben ge¬ 
schützt werden. 






Bild 4. Eine aufgeschnittene 574-Zoll-Diskette 


Diskettenorganisation 

Um Daten auf einer Diskette zu lesen oder zu schreiben, 
muß das DOS die physikalische Position des Schreib-/ 
Lesekopfes auf der Diskette erkennen. Die zur Positions¬ 
bestimmung erforderlichen Markierungen werden vom 
DOS auf die Diskette geschrieben, den Vorgang des Mar¬ 
kensetzens nennt man »Formatieren«. 

Beim 1541-Laufwerk von Commodore wird die Diskette 
beim Formatieren in 35 konzentrische Spuren (engl. 
Tracks) aufgeteilt. Jede Spur ist wiederum in kleinere Ein¬ 
heiten, sogenannte Sektoren (engl. Sectors), unterteilt. Je 
nach Position (außen oder innen auf der Diskette) hat eine 
Spur zwischen 17 und 21 Sektoren, von denen jeder 254 
Datenbytes aufnehmen kann. Bei Commodore werden die 
Sektoren auch als Blöcke (Blocks) bezeichnet. 

DOS (disk operating System) 

Damit ein Computer überhaupt einen Massenspeicher 
ansprechen kann, muß er über ein spezielles Betriebssy¬ 
stem verfügen. Das DOS ist das »Diskettenbetriebssystem« 
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eines Computers. Bei vielen Heimcomputern sind Disket¬ 
tenlaufwerke Erweiterungsbausteine, die extra gekauft 
werden müssen, wobei das DOS meist mitgeliefert wird. 
Die Commodore-Laufwerke nehmen eine Sonderstel- 


spräche einem zweidimensionalen Feld von acht mal acht 
Elementen. Jedes einzelne Kästchen stellt ein Element dar, 
und jedes Element hat einen eigenen Wert. 


lung ein, denn sie sind bereits ab Werk »intelligent«, das 
heißt, sie verfügen über ein eigenes, fest eingebautes 
Betriebssystem, das vom normalen Basic aus angespro¬ 
chen werden kann. Diese Methode bietet den Vorteil, daß 
keinerlei Computerspeicher belegt wird. Außerdem kann 
man das Laufwerk gleichzeitig, aber unabhängig vom 
Computer, Diskettenmanipulationen vornehmen lassen 
(Beispiel: Validieren einer Diskette). 

Duplex 

Wenn auf einer Datenübertragungsleitung Daten nur in 
einer Richtung übertragen werden, bezeichnet man dies 
als Simplex-Betrieb. Dieses Verfahren wird wegen der feh¬ 
lenden Rückmeldemöglichkeit (zum Beispiel zur Fehler¬ 
korrektur) nur sehr selten angewandt. 

Im Halbduplexbetrieb wird immer nur in eine Richtung 
übertragen. In der Hobby-DFÜ versteht man unter Halbdu¬ 
plex zumeist Vollduplexbetrieb ohne Echo. 

Beim Vollduplexbetrieb ist die gleichzeitige Datenüber¬ 
tragung in beide Richtungen möglich, das heißt, beide 
Computer können gleichzeitig senden und empfangen. Im 
Echo-Betrieb wiederholt der empfangende Computer die 
Daten und sendet sie an den ersten Computer zurück. 

Die Kommunikation zwischen Anwender und Mailbox fin- 


Flußdiagramm (engl, flowchart) 

Schematische Darstellung eines sequentiellen Pro¬ 
grammablaufs unter Verwendung standardisierterZeichen 
und Symbole, die Ereignisse oder Beziehungen zwischen 
Ereignissen während des Programmablaufs darstellen 
können. 



Fremdformate 

Ein großer Vorteil von CP/M ist die Softwarekompatibilität 
der CP/M-Computer untereinander. Durch unterschiedli¬ 
che Aufzeichnungsformate können trotzdem nicht einfach 
Disketten ausgetauscht werden, denn fast jeder CP/M- 
Computer teilt sich die Diskette beim Formatieren system¬ 
spezifisch ein. Es gibt jedoch Laufwerke, die Formate von 
anderen Computer (eben jene Fremdformate) lesen und 
schreiben können. Dazu zählt auch die 1570/1571 von 
Commodore, welche bereits ab Werk in der Lage ist, Disket¬ 
ten folgender CP/M-Computer zu verwenden: Kaypro II, 
Osborne, Epson QX10 und Personal Computer unter CP/M 
86 . Mit Hilfe entsprechender Software kann sogar fast jedes /Ts 
CP/M-Format genutzt werden, was die Dateiübertragung 
erleichtert und Platz sparen hilft: Eine Diskette im Kaypro 
IV-Format faßt immerhin knapp 400 KByte - auch mit der 
Floppy 1571. 


det nahezu ausschließlich im Vollduplexbetrieb statt. 

Editor 

Ein Programm, welches das Editieren von Text- oder Pro¬ 
grammdateien ermöglicht. Unter dem Begriff »editieren« 
versteht man Modifikationen einer Datei, zum Beispiel Ein¬ 
fügen und Umstellen von Textbereichen, Verschiebungen 
und Löschungen. 


Hardcopy 

Ausdruck von Texten oder Grafiken. Viele Computer ver¬ 
fügen über eine spezielle Hardcopy-Funktion, mit der der 
aktuelle Bildschirminhalt auf den Drucker ausgegeben 
wird. 

Beim C64 gibt es entsprechende Programme (Hard¬ 
copy-Routinen), die geladen werden können und bei Aufruf 
den Grafik- oder Textbildschirm auf das Papier bringen. 



Bild 5. Der Expansions-Port des C64 


Hardware 

Überbegriff für alle mechanischen oder elektronischen 
Teile eines Computersystems, also alle materiellen Teile, 
sozusagen »was man anfassen kann«. 

Hexadezimal 

Das hexadezimale Zahlensystem beschreibt die Darstel¬ 
lung von Zahlen zur Basis 16. Die Dezimalzahlen von 0 bis 
15 werden durch die Ziffern von 0 bis 9 und die Buchstaben 
A bis F (für 10 bis 15) dargestellt. Dieses System wird häufig 
zur platzsparenden Darstellung von Binärzahlen benutzt. 
Ein Byte läßt sich auf diese Weise mit nur zwei Symbolen 
eindeutig darstellen: Binär »11111011« entspricht Hex »FB«. 
Hexadezimalzahlen werden in der Regel durch ein voran¬ 
gestelltes »$« gekennzeichnet. 



Expansion-Port (Erweiterungs-Steckplatz) 

An diesem Anschluß (Bild 5) des C64/C128 ist fast der 
gesamte Bus des Computers herausgeführt. Das bedeutet, 
daß alle zum Betrieb des Computers wichtigen Leitungen 
und Signale von außen zugänglich sind. 

Damit läßt sich sehr viel anfangen, so können sehr gut 
Erweiterungsmodule von außen an den Computer ange¬ 
schlossen werden. Ebenfalls kann hier ohne Aufschrauben 
des Computers ein anderes Betriebssystem angeschlos¬ 
sen werden. 

Feld (engl, array) 

Ein (mehrdimensionales) Datenfeld, auf dessen einzelne 
Elemente zugegriffen werden kann. Ein Schachbrett ent- 


Interpreter 

Der Interpreter durchläuft für jeden Befehl einer be¬ 
stimmten Programmiersprache eine festgelegte Befehls¬ 
sequenz in Maschinensprache. Diesen Prozeß nennt man 
»interpretieren«. Beispiel: Wird ein Basic-Programm abge¬ 
arbeitet und stößt der Basic-Interpreter auf den Befehl 
PRINT, so durchläuft er die entsprechende Bildschirmaus¬ 
gabe-Routine. 



Kl, Künstliche Intelligenz 

Die zentrale Frage der Kl ist: »Wie kann alles, was Men¬ 
schen wissen, im Computer dargestellt und verarbeitet 
werden?« 

Die Probleme der künstlichen Intelligenz können mit den 
bisherigen Programmiermethoden nicht mehr gelöst wer- 


33Ö? 


46 


SONDERHEFT 19 







C64 


GRUNDLAGEN 






den; man braucht geeignetere Methoden, um Dinge der 
realen Welt (Gesetzmäßigkeiten, Zusammenhänge) auf 
einem Computer darzustellen. 

Bekannte Kl-Sprachen sind Lisp und Prolog. Diese 
unterscheiden sich grundlegend von Sprachen wie Basic 
oder Pascal. 

Mailbox 

Hinter dem Begriff Mailbox verbirgt sich nichts anderes 
als ein Computer, der mit dem Telefonnetz verbunden ist 
und mittels entsprechender Software Anrufe entgegen¬ 
nimmt und den Benutzer auf die Datenbestände zugreifen 
läßt. 

Prinzipiell ist eine Mailbox ein »elektronischer Briefka¬ 
sten«, in dem Daten (also auch Texte) abgelegt und wieder 
hervorgeholt werden können. Eine Mailbox umfaßt in der 
Regel aber wesentlich mehr Funktionen, zum Beispiel 
»Pinwände«, an die jeder seine Texte elektronisch »anhef¬ 
ten« kann, so daß sie von weiteren Benutzern gelesen wer¬ 
den können. 

Es gibt, besonders in den USA, auch (meist kommer¬ 
zielle) Mailboxen, die mit Großrechnern und mehreren Tele¬ 
fonanschlüssen arbeiten, so daß sich auch mehrere Benut¬ 
zer gleichzeitig im System befinden können und sogar 
Dialog- und Konferenzschaltungen möglich sind. 

Modem 

Ein Modem ist ein Gerät zur Datenübertragung, welches 
ohne Umwege an das Telefonnetz angeschlossen wird, 
also direkt (galvanisch) an die Telefonbuchse in der Wand. 
Bei einem Modem handelt es sich um ein Kombinationsge¬ 
rät aus MOdulator und DEModulator, welches digitale 
Signale (vom Computer) in analoge (Ton-) Signale umwan¬ 
delt. Somit können zur Tonübertragung geeignete Medien, 
wie zum Beispiel Telefonleitungen, für die Übermittlung 
digitaler Informationen eingesetzt werden. Der Anwender 
merkt hiervon wenig, denn die vom Modem erzeugten 
Signale werden direkt in das Telefonnetz eingespeist. Bei 
Bildschirmtext wird ein Modem zwischen Telefonanschluß 
und Btx-Endgerät geschaltet. Durch die galvanische Kopp¬ 
lung werden im Gegensatz zum Akustikkoppler Störungen 
durch Umweltgeräusche völlig ausgeschaltet. 

Monitor 

Bildschirmeinheit eines Computersystems (Bild 6). Vom 
Prinzip her ist ein Monitor nichts anderes als ein Fernseher, 
aber mit einem besseren, schärferen Bild und ohne einge¬ 
bautes Empfangsteil (Tuner). 

Man unterscheidet zwischen monochromen (einfarbi¬ 
gen) und Farbmonitoren. 

Ebenfalls als Monitor werden Maschinensprache- 
Hilfsprogramme bezeichnet. 

Programmiersprache, höhere 

(engl, higher level language) 

Alle Programmiersprachen, die sich durch »echte« Worte 
programmieren lassen (im Gegensatz zu Assembler), und 
bei denen die Anweisungen nicht im Befehlsformat des 
Prozessors formuliert sind, werden als höhere Program¬ 
miersprachen bezeichnet. Hier wird grundsätzlich noch 
zwischen Compiler- und Interpretersprachen unterschie¬ 
den. 

Prozessor 

Eine Funktionseinheit innerhalb eines Computersy¬ 
stems, die nach vorgegebenen Anweisungen die Funktion 
anderer Einheiten steuern kann. 

Die umfangreichsten Tätigkeiten dieser Art übernimmt 
die CPU (central Processing unit), welche wegen ihrer zen- 



Bild 6. Ein Computer-Monitor 


tralen Stellung im System auch Zentralprozessor genannt 
wird. 

Daneben kann ein Computer aber noch mehrere spezia¬ 
lisierte Prozessoren (Coprozessoren) zur Steuerung peri¬ 
pherer Geräte oder zur effektiven Bearbeitung arithmeti¬ 
scher Problemstellungen (Arithmetikprozessor) aufwei¬ 
sen. 

RAM (engl, random access memory) 

Fjalhleiterspeicher, der sowohl gelesen als auch 
besci ..ieben werden kann. Wird die Betriebsspannung 
abgeschaltet (Ausschalten des Computers), so geht der 
Inhalt des RAMs verloren. 

Reinigungsdiskette 

Um eine Beschädigung von Diskette und/oder Laufwerk 
zu vermeiden, sollte der Schreib-/Lesekopf regelmäßig 
gereinigt werden. Zu diesem Zweck gibt es Reinigungsdis¬ 
ketten, bei denen trockene, halbtrockene, feuchte und 
Chromdioxid-Typen unterschieden werden. Vor trockenen 
Reinigungsdisketten warnen wir ausdrücklich, da diese 
den Dreck regelrecht abschmirgeln, was mehr Schaden 
anrichtet als nutzt. Beim halbtrockenen Verfahren muß vor 
dem Einlegen eine Flüssigkeit aufgebracht werden, so daß 
der Schmutz schonend gelöst wird. Feuchte Reinigungs¬ 
disketten enthalten auswechselbare Reinigungsvliese und 
werden immer nur einmal verwendet. Das letzte Reini¬ 
gungsverfahren arbeitet mit einer chromdioxidbeschichte¬ 
ten Plastikfolie. Auch hier wird der Schmutz trocken abge¬ 
rieben, was jedoch laut Hersteller den Kopf nicht angreift. 

Register 

Speichereinheit im Prozessor, in der Daten kurzzeitig 
während arithmetischer, logischer oder Übertragungsope¬ 
rationen zwischengespeichert werden. 

ROM, PROM, EPROM, EEPROM 

Ein ROM (read only memory) ist ein Halbleiterspeicher, 
dessen Daten unveränderbar sind und nur ausgelesen 
werden können. Alle ROMs sind nichtflüchtig, der 
Speicherinhalt bleibt also nach Abschalten der Betriebs¬ 
spannung erhalten. ROMs sind vor allem zur Speicherung 
eines Computer-Grundbetriebssystems im Einsatz, wobei 
die Daten und Steuerprogramme meist herstellerseitig in 
das ROM »hineingebrannt« werden. 
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Um die Kosten für die teure Herstellung eines zur Ent¬ 
wicklung notwendigen Mikrofilms zu sparen, verwendet 
man bei Kleinserien die nur einmal beschreibbaren (und 
nicht löschbaren) PROMs (programmable ROM). 

Ein EPROM (erasable programmable ROM) ist im 
Gegensatz dazu ein mehrfach beschreibbarer Speicher¬ 
baustein. Zum Programmieren eines EPROMs benötigt 
man einen sogenannten EPROMer oder EPROM-Brenner, 
mit dem die Daten in das EPROM »gebrannt« werden. Das 
Löschen funktioniert durch Bestrahlung mit U V-Licht, wozu 
es spezielle EPROM-Löschgeräte auf dem Markt gibt. 

Im Gegensatz dazu kann ein EEPROM (electrically era¬ 
sable programmable ROM) auf elektrischem Wege 
gelöscht werden, was wesentlich schneller und vor allem 
schonender ist. 

Schleife (engl, loop) 

Teil eines Computerprogramms, der solange wiederholt 
wird, bis eine bestimmte Bedingung erfüllt ist. 

Schnittstelle 

Allgemein die Verbindungsstelle zweier miteinander in 
Verbindung stehender Systeme. Es hat sich die Unter¬ 
scheidung zwischen Mensch-Maschine-Schnittsteile und 
Maschine-Maschine-Schnittstelle eingebürgert. 

Die Mensch-Maschine-Schnittstelle (auch Benutzer¬ 
schnittstelle genannt) umfaßt die Bedienelemente eines 
Computers, zum Beispiel Tastatur oder Bildschirm, aber 
auch denjenigen Teil der Software, der mit dem Benutzer in 
Dialog tritt (bei der Software spricht man hier von der 
»Benutzeroberfläche«). 

Über eine Maschine-Maschine-Schnittstelle erfolgt der 
Austausch von Daten oder Steuerinformationen zu den 
peripheren Geräten (Drucker, Diskettenlaufwerk). 

Schreibschutz 

Um Daten vor einem versehentlichen Löschen oder 
Überschreiben zu schützen, verfügen die meisten Daten¬ 
träger über eine Schreibschutzvorrichtung. Bei einer Ton¬ 
bandkassette wird dazu ein kleines Plastikteil aus dem 
Gehäuse herausgebrochen. Die Aufnahmetaste eines Kas¬ 
settenrecorders kann nun nicht mehr gedrückt werden, 
wenn sich diese Kassette im Laufwerk befindet. Ähnlich 
funktioniert das Ganze bei einer 5V4-Zoll-Diskette: Hier ist 
an der Seite eine sogenannte »Schreibschutzkerbe« vor¬ 
handen. Wird diese Öffnung mit einem Stück undurchsich¬ 
tigen Klebeband verschlossen, kann diese Diskettenseite 
nur noch gelesen werden. Ein Überschreiben der Daten 
oder gar Formatieren der Diskette wird somit verhindert. 
Bei der 3V2-Zoll-Diskette befindet sich ein kleiner Schiebe¬ 
schalter im Diskettengehäuse, der den Schreibschutz ein- 
und ausschaltet. 

Software 

Die Software ist der nicht-materielle Bestandteil eines 
Computersystems, also die Programme und Daten. 

Sprites 

Vom Anwender freidefinierbares, grafisches Objekt. Auf 
dem C64 ist ein Sprite 21 x 24 Punkte groß. Sprites können 
dort sowohl farbig als auch schwarzweiß dargestellt wer¬ 
den. Der Vorteil dieser Objekte besteht darin, daß sie unab¬ 
hängig vom Bildschirminhalt als eigenständige Fläche 
bewegt werden können. Ohne programmtechnische Tricks 
können auf dem C64 bis zu acht dieser Gebilde dargestellt 
und bewegt werden. 

Sprites werden hauptsächlich benutzt, um bei Compu¬ 
terspielen Figuren unabhängig vom gerade angezeigten 
Bildschirm bewegen zu können. 


Systemsoftware 

Hierzu zählen alle Systemprogramme, die nicht anwen¬ 
dungsbezogen, sondern für den Betrieb des Computers 
grundsätzlich erforderlich sind. Dazu gehört auch das 
Betriebssystem eines Computers. 

Übertragungsprotokoll 

Bei der Kommunikation von Computern im Datenaus¬ 
tausch befolgen die beteiligten Geräte einen Standard, der 
die Einzelheiten des Informationsaustausches regelt. Dies 
ist sowohl bei der Kommunikation von Computern mit Com¬ 
putern als auch bei der Datenübertragung eines Compu¬ 
ters zu einem Peripheriegerät (wie zum Beispiel einem 
Drucker) notwendig. Der gemeinsame Standard wird in 
Anlehnung an die Sprechweise der Diplomaten Protokoll 
genannt. 

Im Quittungsbetrieb (engl, handshaking) teilen sich sen¬ 
dender und empfangender Computer gegenseitig mit, 
wann sie zum Empfang oder zur Übertragung weiterer 
Informationen bereit sind. Würde auf das Protokoll verzich¬ 
tet oder der Austausch von Quittungen (englisch: acknow- 
ledge) unterbleiben, so gingen mit ziemlicher Sicherheit 
Informationen verloren. 

User-Port (Schnittstelle für den Benutzer) 

Dieser Port des C64/C128 (Bild 7) ist ein variabler Ein-/ 
Ausgabe-Anschluß. Variabel bedeutet in diesem Zusam¬ 
menhang, daß man jede der acht Datenleitungen, die hier 
herausgeführt sind, unabhängig auf Ein- oder Ausgang 
schalten kann. 



Bild 7. Der User-Port des C64 


So lassen sich hier zum Beispiel Meßwerte aufnehmen, 
die dann von einem Programm weiterverarbeitet werden 
können. Auch ist es möglich, über den User-Port diverse 
Geräte (Lichtorgel, Alarmanlage) zu steuern. 

Der User-Port findet aber hauptsächlich Anschluß beim 
Betrieb von Druckern mit Centronics-Schnittstelle und Aku¬ 
stikkopplern. 

Variable 

Symbolischer Name, an den ein Wert oder eine Zeichen¬ 
kette gebunden ist. Indem man sich (in einem Programm) 
auf den Namen bezieht, bezieht man sich auf den in der 
Variable enthaltenen Wert oder die darin enthaltene Zei¬ 
chenkette. 

Es gibt verschiedene Variablentypen, die unterschied¬ 
liche Arten von Werten beinhalten können. So ist eine Inte¬ 
gervariable ausschließlich zur Aufnahme ganzer Zahlen 
(zum Beispiel 3, 165 oder -91) bestimmt. (pd) 
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Basic-Kenntnisse gehören heute zur Allgemein¬ 
bildung! Ein Commodore-Besitzer muß einfach 
Basic können, um mit seinem Computer vernünf¬ 
tig zu arbeiten. Denn die meisten Programme 
sind in Basic geschrieben. Sie werden staunen, 
wie schnell Sie ein funktionierendes Basic- 
Programm geschrieben haben! Hier zeigen wir 
allen Neulingen, wie man programmiert. 

A lle Anfänge werden begleitet von guten Vorsätzen! 
Am Anfang dieses Basic-Kurses möchte ich keine 
Ausnahme machen und sogar soweit gehen, Ihnen 
meine guten Vorsätze offen darzulegen. 

1. Ich habe den Kurs so geschrieben, daß Sie nur wenige 
Voraussetzungen mitbringen müssen, um ihn zu verste¬ 
hen. Ich gehe davon aus, daß Sie die ersten Kapitel des 
Handbuches gelesen und angewendet haben, welches 
Ihnen beim Kauf des Computers mitgeliefert worden ist. 

2. Ich möchte gern ohne Fach-Chinesisch erklären. Wo 
ich ohne Fachausdrücke nicht auskommen kann - und 
das wird natürlich öfters Vorkommen - werde ich sie 
erklären. 

3. Der Kurs beginnt ganz langsam, mit vielen leichten Bei¬ 
spielen und Wiederholungen. 

4. Der Kurs soll aber nicht langweilig sein. Er wird daher 
bald an Tempo zunehmen, im Vertrauen darauf, daß Sie 
sehr bald keine reinen Anfänger mehr sein werden. 

5. Ich gehe davon aus, daß Sie sich nicht ein rein theoreti¬ 
sches Basic aneignen, sondern programmieren lernen 
wollen. Das bedeutet aber, daß ich Ihnen auch Bedie¬ 
nungshinweise und Erklärungen der Arbeitsweise des 
Computers geben muß - so wenig wie möglich und so 
viel wie nötig. 

6 . Der letzte Vorsatz ist eigentlich eine Aufforderung an 
Sie, liebe Leser. Wenn Sie etwas nicht verstanden oder 
spezielle Fragen haben, dann schreiben Sie mir bitte 
über den Verlag. Ich werde die Fragen entweder direkt 
beantworten oder aber die Fragen sammeln und Ihnen 
im 64’er eine eigene Frage-Antwort-Foige widmen. 
Bevor wir anfangen, will ich noch schnell die Methode 
erwähnen, mit der Sie am besten den Kurs verfolgen und 
den Stoff nachvollziehen können. 


Ich möchte diese Vorgehensweise »SIMULTAN¬ 
METHODE« (Bild 1) nennen, was nichts anderes bedeutet, 
als das Heft mit Basic-Kurs vor dem Computer sitzend zu 
lesen und alle Angaben, die mit dem Zeichen » —► « 
gekennzeichnet sind, sofort einzutippen und auszuprobie¬ 
ren. 

Ich bin mir bewußt, daß ich dadurch eine Arbeitsweise 
begünstige, die von vielen Programmierspezialisten gene¬ 
rell v- teufelt und ganz besonders der Sprache Basic vor¬ 
geworfen wird, nämlich »Hackerei«. 

Aber gerade für Anfänger ist die Eigenschaft von Basic, 
die kleinsten Programmteile sofort ausprobieren zu kön¬ 
nen, von großem Vorteil. 

So, jetzt habe ich keinen Grund mehr, weitere schöne 
Einleitungsphrasen zu dreschen. Jetzt soll’s losgehen. 

Lektion 1: 

Wie bediene ich den Computer? 


Voraussetzung für die Arbeit mit einem Computer ist eine 
Einrichtung, dem Computer mitzuteilen, was er tun soll und 
eine andere Einrichtung, um zu sehen, was er tut bezie¬ 
hungsweise was er getan hat. Dazu dient als allererstes die 
Tastatur und der Bildschirm. 

Sobald Sie den Computer einschalten, ist das Eingabe¬ 
gerät Tastatur direkt mit dem Ausgabegerät Bildschirm ver¬ 
bunden. Im Handbuch Ihres Computers haben Sie sicher 
schon nachgelesen, wie die Tastatur funktioniert und wie 
damit Zeichen auf den Bildschirm gezaubert werden. Ich 
will das nicht im Detail wiederholen, aber ein paar Gedan¬ 
ken ist das Thema »Tastatur«schon wert. 

Ich teile die Tasten in drei verschiedene Typen ein: 

- Funktionstasten 

- Zeichentasten 

- Steuertasten 

Mit Funktionstasten werden die 4 senkrecht untereinan¬ 
der angeordneten Tasten <F1 > bis <F7> rechts außen 
bezeichnet. Sie sind universell für alle möglichen Funktio¬ 
nen ersetzbar, können diese Funktionen aber erst dann 
erfüllen, wenn sie entsprechend programmiert worden 
sind. Aus diesem Grund werde ich sie erst später behan¬ 
deln und ich lasse sie vorläufig links liegen. 
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Zeichentasten erzeugen, wie ihr Name sagt, Zeichen. 
Dazu gehören Buchstaben und Zahlen, mathematische 
Zeichen (Addition, Multiplikation, runde Klammern etc.), 
Symbole (Dollar, Anführungsstrich, Pfeile und so weiter) 
und grafische Zeichen. Die grafischen Zeichen stehen 
nicht oben auf den Tasten, sondern auf ihrer Vorderseite. 

Jede Zeichentaste bietet mehrere Zeichen und Symbole 
zur Auswahl. Um die Verschiedenen Zeichen einer Taste 
auszuwählen und auf den Bildschirm zu bringen, verwen¬ 
den wir spezielle Tasten wie <SHIFT>, <CTRL> und so 
weiter. Diese Tasten nenne ich Steuertasten. 

Sie steuern auf sehr direkte Art und Weise alle Vorgänge 
auf dem Bildschirm. Aber sie erlauben auch, innerhalb von 
Programmen deren Abläufe zu steuern und zu verändern. 

Ich halte diese Tasten für wichtig genug, um trotz ihrer 
Behandlung im Handbuch von Commodore etwas näher 
auf sie einzugehen. 

Steuertasten sind also die CTRL-Taste, mit der die acht 
verschiedenen Zeichenfarben schwarz bis gelb eingestellt 
werden können, aber auch die SHIFT-Taste, welche den 
rechten Teil der Zeichen und grafischen Symbole umschal¬ 
tet. Dazu gehört auch die Taste links unten, die das Firmen¬ 
zeichen von Commodore trägt und welche die linken Sym¬ 
bole umschaltet. 

Dazu gehören schließlich und letztlich die Cursor- 
Steuertasten <CRSR>, die INST/DEL-Taste und die 
CLR/HOME-Taste. 

Diese letztgenannten Tasten sind eng mit der Wirkungs¬ 
weise des sogenannten Editors verbunden. 

Editor ist ein englisches Wort und heißt soviel wie Redak¬ 
teur. In unserem Fall ist der Editor ein im Computer fest ein¬ 
gebautes Programm, welches wie ein Redakteur dafür 
sorgt, daß auf dem Bildschirm alle Zeichen und Symbole in 
den entsprechenden Farben auf den richtigen Platz kom¬ 
men. 



Ein sichtbares Hilfsmittel, dem Editor unsere Wünsche 
und Vorstellungen mitzuteilen, ist der Cursor. 

Die Bedeutung und seine Handhabung haben Sie ja 
sicher schon dem Handbuch entnommen. Das Wort »Cur¬ 
sor« kommt nicht vom englischen »curse« = verfluchen 
(obwohl das Verhalten des Cursors oft dazu verleitet), son¬ 
dern aus dem Lateinischen, wo es »Läufer« bedeutet. 

Der Cursor läuft also über den Bildschirm, gesteuert vom 
Editor. Sie können seinen Lauf auch steuern, und zwar mit 
den beiden Cursor-Steuertasten. 

Eine andere Steuerung des Cursors bietet die CLR/ 
HOME-Taste rechts oben. Allein gedrückt - dann gilt 
< HOME > - bringt sie den Cursor »nach Hause« nämlich 


in die linke obere Ecke des Bildschirms. Wird die Taste mit 
<SHIFT> umgeschaltet, bedeutet sie <CLR> - das 
heißt <CLEAR>, auf deutsch Freimachen oder Löschen. 
Jetzt wird nämlich der Cursor nach links oben gebracht und 
zusätzlich der Bildschirm gelöscht. 

Probieren Sie bitte diese Cursor-Bewegungen aus. 

—► Am besten fahren Sie den Cursor in die Mitte des Bild¬ 
schirms, tippen ein paar beliebige Buchstaben ein 
und drücken dann die HOME-Taste. 

—► Wiederholen Sie das Ganze und verwenden Sie 
dann die CLR-Taste. 

Der Editor bietet uns noch einen anderen sehr lobens¬ 
werten Service. Er berücksichtigt nämlich, daß wir alle sehr 
menschliche Menschen sind, die nicht nur viele Fehler 
machen, sondern auch immer wieder ihre Meinung 
ändern. Der Editor erlaubt uns, Fehler zu korrigieren oder 
bereits getippte Zeichenfolgen abzuändern. 

—► Sie können mit dem Editor ungestraft über vorhan¬ 
dene Zeichen fahren, ihn nach Lust und Laune anhal- 
ten und dort, wo er gerade blinkt, ein neues Zeichen 
eintippen. 

Ich nenne das »überschreiben«. Wo wir ein Überschrei¬ 
ben nicht änwenden können, hilft uns die INST/DEL-Taste 
(rechts oben) weiter. 

<INST> ist die Abkürzung für Insert, das heißt soviel 
wie einfügen. 

< DEL> bedeutet Delete, und das heißt entfernen oder 
auslöschen. 

Im Handbuch steht nur eine kurze Beschreibung der Wir¬ 
kung dieser Taste, die aber nicht unbedingt ausreichend ist. 
Schon erste Versuche zeigen, daß die Taste ihre Tücken 
hat. Ich bin dafür, DEL und INST einfach auszuprobieren. 
—► Schalten Sie den Computer aus und dann wieder ein. 
—-► Fahren Sie mit dem Cursor auf das A von READY. Er 
steiit jetzt an der dritten Stelle vom linken Bildrand. 
—► Drücken Sie die DEL-Taste. Das E ist verschwunden, 
es steht nur noch RADY da, der Cursor blinkt immer 
noch auf dem A, er ist aber jetzt an die zweite Stelle 
vom linken Bildrand gerückt. 

—► Ein zweiter Druck auf die DEL-Taste reduziert das 
Wort auf ADY, und der Cursor steht jetzt auf der ersten 
Stelle. 

Die DEL-Taste löscht also das links neben dem Cursor 
stehende Zeichen und verschiebt den Cursor mitsamt dem 
ganzen rechten Schwanz eine Stelle nach links. Was pas¬ 
siert aber, wenn der Cursor am linken Bildrand angestoßen 
ist? 

—► Ein dritter Druck auf die DEL-Taste bringt den Cursor 
an den rechten Bildrand eine Zeile darüber, nur da 
gibt es gerade nichts zu löschen. Seinen ADY- 
Anhang läßt er am Anfang der unteren Zeile zurück. 
—► Lassen Sie die DEL-Taste gedrückt. Der Cursor läuft 
kontinuierlich weiter nach links, löscht alles, was ihm 
in den Weg kommt - solange, bis er »zu Hause« links 
oben angekommen ist. 

Der geSHIFTete Teil dieser Taste, nämlich <INST> ist 
ebenso trickreich. 

—► Schalten Sie den Computer aus und wieder ein. 

—► Fahren Sie mit dem Cursor wieder auf das Avon ADY. 
—► Drücken Sie die INST-Taste (SHIFT + INST/DEL). 
Der Cursor bleibt auf seiner dritten Stelle vom linken 
Bildrand stehen. Aber das Zeichen, auf dem er blinkt 
und alles, was rechts von ihm steht, wird eine Stelle 
nach rechts geschoben. Wo der Cursor blinkt, ent¬ 
steht eine freie Stelle, auf die direkt ein neues Zei¬ 
chen geschrieben werden kann. 

—► Durch mehrfaches Drücken der INST-Taste werden 
mehrere Stellen freigeschoben, in die mehrere Zei¬ 
chen hintereinander eingefügt werden können. 
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Dieses Freimachen beziehungsweise Einfügen geht 
nicht in beliebiger Länge, da der Editor gewissen Ein¬ 
schränkungen unterliegt. Ich würde natürlich am liebsten 
jetzt weiter über den Editor mit allen seinen Regeln und Ein¬ 
schränkungen dozieren. Und irgendwann muß ich es auch 
noch tun, denn beim Experimentieren werden Sie sicher 
noch darauf stoßen und wissen dann vielleicht nicht weiter. 

Damit Sie aber nicht ungeduldig werden, möchte ich auf 
weitere Feinheiten vorläufig verzichten und das bisher 
Gelernte für die ersten Schritte in Basic anwenden. 


FAZIT 

Die Zeichen- und Steuerlasten erzeugen eine direkte Wir¬ 
kung auf dem Bildschirm. Der Bildschirm wird von einem 
eingebauten Programm verwaltet - dem Editor. Er ermög¬ 
licht beliebige Änderungen und Korrekturen von bereits 
eingegebenen Texten und Zahlen. 


Lektion 2: 

Computer bedeutet Rechenmaschine 


Diese Überschrift weist uns den Weg für das weitere Vor¬ 
gehen. 

Wenn jeder simple Taschencomputer rechnen kann, 
dann müssen es die Commodore-Computer auch können. 
Dazu will ich Ihnen noch schnell die Symbole der mathema¬ 
tischen Funktionen aufschreiben, die der Computer ver¬ 
wendet. 


FUNKTION 

SYMBOL 

BEISPIEL 

Addition 

+ 

3 + 2 

Subtraktion 

- 

3-2 

Multiplikation 

* 

3-2 

Division 

/ 

3/2 

Potenz 

1 

312 


Die unterste Funktion ist wahrscheinlich die für Sie unge¬ 
wohnteste. Das Beispiel wird im Klartext als »drei hoch 
zwei« oder als »drei Quadrat« gelesen. 

Beim Taschenrechner wird normalerweise eine Rech¬ 
nung so eingegeben: 

—*• 3 + 2 = 

Aber beim C64 rührt sich da gar nichts, außer daß diese 
Zeile auf dem Bildschirm steht. 

Und warum passiert nichts? 

Überlegen Sie - alles, was wir gemacht haben - war, per 
Tastendruck Zahlen und Symbole einzutippen. Wir haben 
lediglich den Editor auf Trab gehalten, den Computer selbst 
haben wir damit nicht aufgeweckt. 

Dieser Faulpelz schläft nämlich so lange, bis er einen 
Auftrag bekommt, etwas auszuführen. Für diesen Tritt, der 
ihn hinter dem Ofen hervorscheucht, brauchen wir eine der 
vorher zwar erwähnten, aber noch nicht eingesetzten Steu¬ 
ertasten zur Programmsteuerung. 

Sie sitzt am rechten Rand der Tastatur und ist mit 
< RETURN > gekennzeichnet. 

Schreiben wir also die Zeile von oben noch einmal. Die¬ 
ses Mal bitte ich Sie aber, nicht die Eingabe-Technik der 
Taschencomputer zu verwenden, sondern mir eine »les¬ 
bare« Schreibweise nachzumachen - Sie werden gleich 
sehen, warum. 

Schließen Sie die Eingabe mit der RETURN-Taste ab. 
Das sieht dann so aus: v 

—► SUMME = 3 + 2 
—► Drücken Sie die RETURN-Taste 


Aber wir sehen ja noch immer nichts! 

Aller Anfang ist schwer. Wir müssen berücksichtigen, 
daß der Computer nichts, aber auch gar nichts von allein 
macht. 

Für alles braucht er eine Anweisung. Nun, oben haben 
wir ihm die Anweisung gegeben, die Summe aus 3 plus 2 
zu bilden. Das hat er auch gemacht, glauben Sie es mir. 
Aber wir haben ihm nicht gesagt, was er mit der Summe 
machen soll, und so hat er sie sich einfach nur gemerkt. 

Wir wollen sie natürlich auf dem Bildschirm sehen. Dazu 
müssen wir dem Computer eine spezielle Anweisung 
geben. 

Dieser Befehl, irgend etwas auf dem Bildschirm auszu¬ 
drucken, lautet in Basic 

PRINT. 

Nach PRINT, was auf deutsch »drucken« heißt, geben wir 
dem Computer an, was er ausdrucken soll - in unserem 
Beispiel die Summe. 

—► PRINT SUMME 

—► Drücken Sie die RETURN-Taste. 

Heureka! Endlich sind wir weitergekommen. Auf dem 
Bildschirm steht, vom Editor in die nächste Zeile gebracht, 
die Zahl, welche der Computer für die SUMME ausgerech¬ 
net hat. 


Basic-Befehl Nr. 1 PRINT 

druckt alles, was hinter dem Wort »PRINT« steht, auf dem 
Bildschirm aus. 


Ich schlage vor, daß Sie mit dem ersten Wort der Sprache 
Basic, das Sie nun gelernt haben, noch ein bißchen üben. 

Bilden Sie das Produkt von 15 mal 14. Das geht doch ein¬ 
fach, oder? 

—► jäpDUKT = 15 * 14 
—► nicht vergessen <RETURN> zu drücken 

(Sie wissen doch, mit RETURN geben wir dem Com¬ 
puter die Anweisung, die getippte Zeile auszuführen) 

—► PRINT PRODUKT 
—► <RETURN> drücken 

Wenn Sie gut Kopfrechnen können, dürfen Sie das 
Resultat nachprüfen. Oder vielleicht nehmen Sie einen 
Taschenrechner! 

Ich wette, irgend ein Leser sagt jetzt: »Was soll der 
Quatsch. Man kann doch die Rechnung 15*14 direkt mit 
PRINT ausführen. Der Umweg über SUMME = oder PRO¬ 
DUKT = ist doch völlig unnötig«. Tja, lieber Leser, das 
stimmt in der Tat. Diese Kurzform ist erlaubt, und ich will Sie 
Ihnen gleich vorführen, vielleicht mit der Division. Wir wol¬ 
len 3 durch 2 teilen. Geben Sie dazu ein: 

—► PRINT 3/2 
—► < RETURN > drücken 

Wir erhalten sofort den Wert 1,5 - aber halt!! Er ist 1.5, also 
nicht mit Komma, sondern mit Dezimalpunkt geschrieben. 
Das ist die amerikanische Schreibweise, an die Sie sich 
gewöhnen müssen; als Preis dafür, daß Sie mit amerikani¬ 
schen Computern arbeiten. 

Also - der Befehl PRINT führt eine nachfolgende Rech¬ 
nung direkt aus und druckt das Resultat auf den Bild¬ 
schirm. Ist demnach meine oben genannte Methode, die 
Rechnung in zwei Schritten auszuführen, tatsächlich 
Quatsch? 

Meine Antwort ist ein klares Nein. Beide Methoden 
haben ihre Berechtigung, und ich will Ihnen auch den 
Unterschied zeigen. 

Mit der ersten Methode (wir haben sie bei SUMME und 
PRODUKT angewendet) erhält der Computer zuerst den 
Auftrag, eine Rechnung durchzuführen. Das Resultat 
merkt er sich unter dem Stichwort SUMME beziehungs¬ 
weise PRODUKT. Haben Sie es gelesen? Er merkt sich das 
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Resultat und legt es in einem Speicher (Bild 2) ab. Das 
bedeutet, daß wir es mit PRINT so oft wir wollen, auf den 
Bildschirm drucken können. Geben Sie jetzt gleich noch¬ 
mal ein: 

—► PRINT SUMME 
—► < RETURN > drücken 

Und siehe da, das Resultat von vorhin erscheint wieder. 
Dasselbe geht mit dem Stichwort PRODUKT. 

Sie brauchen übrigens die Zeile nicht neu einzugeben. 
Vergessen Sie den Service des Editors nicht! 

—► Fahren Sie mit dem Cursor auf die letzte PRINT-Zeile 
und überschreiben Sie das Wort SUMME mit dem 
Wort PRODUKT, dann muß nur noch die RETURN- 
Taste gedrückt werden. 

Und noch einmal siehe da, wir erhalten das Resultat der 
Multiplikation wieder. 

So, und was ist mit der Division? 

Leider, leider! Da geht nichts mehr. Wir haben kein Stich¬ 
wort für das Resultat vorgegeben, und der Computer hat 
sich auch nichts gemerkt. 

Das ist also der Unterschied: 


• PRINT 3 + 2 

• SUMME = 3 + 2 

• PRINT SUMME 

Das Resultat der Rechnung 
wird ausgedruckt 

Das Resultat der Rechnung wird 
unter dem Stichwort SUMME 
gespeichert und dann ausgedruckt 


Die linke Anwendung des Befehls PRINT ist einfach, und 
Sie können sie immer verwenden, um nach Art des Ta¬ 
schenrechners schnell einmal irgendwelche Rechnungen 
zu machen. Aufgezeichnet wird das Resultat allerdings nur 
auf dem Bildschirm. Im Computer selbst bleibt nichts 
gespeichert. 

Die rechte Art ist schwieriger, aber interessanter. Es ist 
eigentlich erstaunlich, daß wir dem Computer die Anwei¬ 
sung geben, sich eine Zahl unter einem Namen oder - wie 
ich es vorhin genannt habe - unter einem Stichwort zu mer¬ 
ken, ohne einen Basic-Befehl geben zu müssen. 

Es gibt tatsächlich einen Befehl dafür, er heißt: 

LET 

Die Anweisung mit dem Stichwort »SUMME« sieht unter 
Zuhilfenahme des Befehls LET so aus: 

LET SUMME =3+2 

In unseren Sprachgebrauch übersetzt heißt das unge¬ 
fähr: »Laß die Summe gleich dem Resultat von 3 plus 2 
sein«. In der Computersprache nennt man das eine 
ZUWEISUNG. 

Wir können demnach beliebige Stichwörter hernehmen 
und ihnen mit dem LET-Befehl Zahlenwerte zuweisen, der 
Computer merkt sie sich alle. 

Wie würden Sie zum Beispiel dem Stichwort A (kürzer 
kann es nicht sein) den Wert 375 zuweisen, dann dem 
Stichwort X den Wert 15 und schließlich die Division von 
vorhin, die der Computer sich nicht gemerkt hat, jetzt 
dauerhaft durchführen ? 

Versuchen Sie es: 

So muß es aussehen: 

—► Löschen Sie den Bildschirm (<SHIFT> + 

< CLR/HOME >) 

—► LET A = 375 (< RETURN > drücken) 

—LET X = 15 ( < RETURN > drücken) 

—► LET QUOTIENT = 3/2 (< RETURN> drücken) 

Jetzt sind im Computer die zwei Werte unter den Stich¬ 
worten A, X und das Ergebnis der Division unter dem 
Namen QUOTIENT gespeichert. 

Mit PRINT-Befehlen können wir alle drei auf den Bild¬ 
schirm bringen: 


—► PRINT A (< RETURN> drücken) 

—*• PRINT X (<RETURN> drücken) 

—► PRINT QUOTIENT (<RETURN> drücken) 

SUMME, PRODUKT, A, X und QUOTIENT, die wir bisher 
»Stichwörter« oder »Namen« genannt und welchen wir mit 
dem LET-Befehl einen Wert zugewiesen haben, werden 
mit einem eigenen Fachausdruck bezeichnet. 

Sie heißen Variable. Ich werde später noch mehr über sie 
berichten. Zunächst bitte ich Sie lediglich, sich den Namen 
zu merken - manchmal werde ich vielleicht auch noch ein 
Stichwort sagen. 

Wozu brauchen wir den Befehl »LET« ? Am Anfang haben 
wir ohne ihn den Stichwörtern Resultate zugewiesen! 

In Basic kann in der Tat der Befehl LET weggelassen wer¬ 
den. Wichtig ist lediglich, daß zuerst die Variable dasteht, 
gefolgt von dem Gleichheitszeichen (=) und dahinter der 
Wert (oder der durch die Rechnung auszurechnende Wert). 


Basic-Befehl Nr. 2 LET 

weist einer Variablen einen Wert zu. Er kann auch wegge¬ 
lassen werden. Es genügt der Name der Variablen, ein 
Gleichheitszeichen und der zugewiesene Wert. 


Interessant ist übrigens, daß der Computer sich ein und 
dasselbe Stichwort nur einmal merkt. Wenn Sie zuerst dem 
Stichwort QUOTIENT den Wert 3/2 zuweisen und gleich 
danach den Wert 15/3, erhalten Sie mit dem PRINT-Befehl 
nicht die Zahl 1.5, sondern 5. 

Das erste Resultat hat der Computer in seinem Speicher 
durch das zweite überschrieben. Probieren Sie es aus: 
—► PRINT QUOTIENT (<RETURN> drücken) 

—*• LET QUOTIENT = 15/3 (< RETURN> drücken) 

—► PRINT QUOTIENT (<RETURN> drücken) 

Zuerst kommt der alte Quotient von vorhin, danach der 
neue Wert. 


FAZIT 

1. Nicht nur wir können Zeichen auf den Bildschirm brin¬ 
gen - der Computer selbst kann das auch. Der Befehl 
PRINT druckt alles, was dahinter steht, auch Ergeb¬ 
nisse von Rechenanweisungen, auf den Bildschirm. 

2. Unter einem Stichwort (Variable genannt) kann sich der 
Computer Zahlenwerte merken, die beliebig oft mit dem 
PRINT-Befehl ausgedruckt werden können. Vorausset¬ 
zung ist lediglich, daß mit dem LET-Befehl dem Stich¬ 
wort der Zahlenwert zugewiesen wird. Das Wort »LET« 
selbst kann auch weggelassen werden. 


Lektion 3: PRINT - der Universalbefehl 


3.1 Zahlenwerte ausdrucken 

Bisher haben wir nur Zahlenwerte und zugehörige Varia¬ 
ble mit PRINT auf dem Bildschirm ausgedruckt. 

Ist Ihnen das viele PRINT-Tippen, so wie bei den Beispie¬ 
len oben, auch so lästig wie mir? 

Diesen Dauerversuch mit unzähligen PRINT-Befehlen 
können Sie vereinfachen. Alle Commodore-Computersind 
nämlich Meister der Abkürzung. So drastisch, wie wir den 
Befehl LET durch Weglassen abgekürzt haben, dürfen wir 
den Befehl PRINT nicht behandeln. Aber immerhin: Er wird 
mit dem Fragezeichen abgekürzt. 

Das Befehlswort »PRINT« kann durch das »?« ersetzt 
werden. 

Statt PRINT 123 

dürfen Sie schreiben ? 123 

Machen Sie bitte Gebrauch von dieser Abkürzung, wann 
immer Sie wollen. 
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Ich werde allerdings stets das ganze Befehlswort ver¬ 
wenden, damit der Text gut lesbar bleibt. 

Die Sprache Basic gewährt uns noch eine Marsch¬ 
erleichterung. Es ist nämlich erlaubt, mehrere auszu¬ 
druckende Werte hinter einen einzigen PRINT-Befehl zu 
setzen. 

Zuerst will ich Ihnen zeigen, wie Sie es nicht machen dür¬ 
fen - probieren geht über studieren. 

Haben Sie die alten Stichwörter noch im Computer? 
Wenn ja, dann brauchen Sie die folgenden Zuweisungen 
nicht nochmal eingeben. Ich wiederhole sie für alle Leser, 
die inzwischen ihren Computer ausgeschaltet und damit 
sein Gedächtnis gelöscht haben. 

—► A = 375 (<RETURN> drücken) 

—► X = 15 (< RETURN > drücken) 

—► QUOTIENT = 15/3 (<RETURN> drücken) 

Sie sehen, ich habe LET weggelassen. 

So, die Werte haben ihr Stichwort, unter dem sie der 
Computer in seinem Speicher wiederfindet. Jetzt wollen 
wir sie mit einem einzigen PRINT-Befehl ausdrucken: 

—► PRINT A X QUOTIENT (<RETURN> drücken) 

Der Computer druckt eine Null aus. Wie gesagt, so geht’s 
nicht. 

Wenn ich Ihnen sage, warum eine Null erscheint, werden 
Sie gleich auf die Lösung des Problems kommen. Was pas¬ 
siert da? 

Für den Computer ist eine Leerstelle (zwischen den 
Variablen) genau so ein Zeichen wie jeder Buchstabe. Das 
heißt, daß er nach dem Drücken der RETURN-Taste in sei¬ 
nem Speicher nach einem Stichwort »A X QUOTIENT« 
sucht - und das findet er natürlich nicht. 

Ihnen ist sicher klar, daß wir also die drei Stichwörter von¬ 
einander trennen müssen. Die Rechtschreibregeln von 
Basic erlauben keine Wörtertrennung mit Leerzeichen, 
sondern mit dem Semikolon »;«. 

Verbessern Sie bitte (durch einfaches Einfügen von zwei 
Semikolons) die letzte Zeile oben: 

—► PRINT A;X;QUOTIENT (< RETURN> drücken) 

Jetzt stimmt’s. 

Bei diesem Beispiel kann ich Ihnen noch etwas zeigen, 
diesmal eine Eigenheit - oder besser gesagt - eine Vor¬ 
sorge des guten alten Editors. Schauen Sie sich genau an, 
wie der Editor die drei Zahlen 375, 15 und 5 auf den Bild¬ 
schirm geschrieben hat. Vor der ersten Zahl steht eine 
Leerstelle, zwischen den Zahlen sind zwei Leerstellen. 

Das kommt daher, daß der Editor vor jeder Zahl eine 
Stelle reserviert, um im Fall einer negativen Zahl Platz für 


das Minuszeichen zu haben. Und zwischen den Zahlen 
hält er natürlich einen Abstand frei. Wie bereits gewohnt, 
wollen wir das am Computer überprüfen. 

—► Bitte geben Sie die drei Werte unserer Variablen als 
negative Zahlen, also mit einem Minuszeichen ein. 
Wenn Sie die Zuweisungen noch auf dem Bildschirm 
stehen haben, geht es schneller mit Hilfe des Editors. 
Fahren Sie mit dem Cursor auf die jeweils vorderste 
Ziffer, schaffen Sie mit der INSERT-Taste (< SHIFT> 
+ <INST/DEL>) eine Leerstelle und tippen Sie ein 
Minuszeichen ein, danach wie immer ein 
<RETURN>. 

Fahren Sie mit dem Cursor auf die Zeile mit dem 
PRINT-Befehl und drücken Sie die RETURN-Taste. 
Ja, der Editor macht es uns wirklich sehr bequem. Und 
jetzt sehen Sie auch, daß die reservierten Plätze im Ergeb¬ 
nis von den Minuszeichen belegt worden sind. Was bleibt, 
sind lediglich die Abstände - der guten Lesbarkeit zuliebe. 

Das Semikolon ist nicht das einzige Symbol zur Tren¬ 
nung von Variablen hinter einem PRINT-Befehl. Die von 
Commodore verwendeten Versionen von Basic erlauben 
auch das Komma - allerdings hat es eine etwas andere Wir¬ 
kung als das Semikolon. 

—► Ersetzen Sie in der Zeile oben, welche den »dreifa¬ 
chen« PRINT-Befehl enthält, die zwei Semikolon 
durch Komma (direkt durch Überschreiben). 
< RETURN > nicht vergessen! 

Wir sehen jetzt wieder die drei Zahlen, aber viel weiter 
auseinandergerückt. 

Dabei wird der Bildschirm sozusagen in 4 Teile geteilt. 
Die ausgedruckten Werte beginnen am linken Rand, dann 
ab dem 10., 20., und 30. Platz. 

FAZlt 

Hinter einem einzigen PRINT-Befehl können mehrere 
Werte auf einmal ausgedruckt werden. Sie müssen entwe¬ 
der durch ein Semikolon oder ein Komma getrennt sein. 
Das Semikolon bewirkt bei Zahlen einen »normalen« 
Abstand von zwei Leerstellen. 

Das Komma verschiebt die Werte auf das nächste 
Bildschirm-Viertel. 


3.2 Buchstabe und Zeichen ausdrucken 

Was macht der PRINT-Befehl mit allen anderen Zeichen 
und Symbolen? Versuchen Sie es ruhig einmal. Fangen Sie 
mit den Tasten links oben an und arbeiten Sie sich durch. 
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Schon bei dem PRINT-Befehl der allerersten Taste, näm¬ 
lich dem Symbol »Pfeil nach links« reagiert der Computer 
unerwartet. 

—► PRINT - (<RETURN> drücken) 

ergibt eine englische Meldung auf dem Bildschirm: 

SYNTAX ERROR 
READY 

Mit der Meldung »SYNTAX ERROR« sagt uns der Com¬ 
puter, daß wir einen Rechtschreib- oder Satzbaufehler 
begangen haben. Das Zeichen »—«darf zum Beispiel nicht 
so einfach mit einem PRINT-Befehl verwendet werden. 

Alle mathematischen Zeichen, Interpunktionen, die 
geSHIFTeten Symbole der Zifferntasten und andere reagie¬ 
ren in dieser Form. 

Andere wieder, wie zum Beispiel mit SHIFT- oder 
Commodore-Taste (CBM-Taste) umgeschalteten Buch¬ 
staben (auf die auf der Vorderseite der Tasten angegebe¬ 
nen Grafiksymbole), ergeben gar keine Reaktion. 

Den PRINT-Befehl mit Buchstaben haben wir ja schon 
mehrfach verwendet. In dem Beispiel ganz oben hat er 
allerdings nicht den Großbuchstaben A, sondern den Zah¬ 
lenwert ausgedruckt, der unter dem Kennbuchstaben A im 
Computer gespeichert worden ist. 

Versuchen Sie es mit einem anderen Buchstaben oder 
Wort, welchem wir noch keinen Wert zugewiesen haben, 
zum Beispiel: 

7 -*- PRINT WORT (< RETURN> drücken) 

Wir erhalten eine Null. 

Das heißt nichts anderes, daß der PRINT-Befehl schlicht 
und einfach jeden Buchstaben bzw. jede Buchstabenfolge 
als ein Stichwort - als eine Variable - interpretiert und deren 
Wert im Speicher sucht, um sie auszudrucken. Haben wir 
ihr noch keinen Wert zugewiesen, wie in unserem letzten 
Beispiel dem Wort »WORT«, dann druckt er eine Null aus. 

Wenn der für den Bildschirm zuständige Editor (ein fest 
eingebautes Computerprogramm) bereitwillig alle Buch¬ 
staben druckt, die wir direkt mit der Tastatur eingeben, 
dann muß es der Computer mit dem PRINT-Befehl auch 
können. 

Die Lösung für unser Problem könnte man als zungen¬ 
brechendes Kochrezept so hinschreiben: 

Um dem Computer mitzuteilen, daß das Wort »WORT« 
ein Wort sein soll, muß man "WORT" schreiben. Das 
Geheimnis liegt im Gebrauch der Anführungszeichen! 

—► PRINT "WORT" (<RETURN> drücken) 

Für Zeichen, Zahlen, Buchstaben, kurz für alles was zwi¬ 
schen zwei Gänsefüßchen steht, verwendet die Computer¬ 
sprache ein eigenes Wort: Zeichenkette oder auf englisch: 
String. 

Strings sind demnach auch alle grafischen Symbole der 
Buchstabentasten, die auf der Vorderseite der Tasten zu 
sehen sind. Auch sie kann man per PRINT auf den Bild¬ 
schirm bringen. 

Für die linken Symbole müssen wir mit der Taste gleich¬ 
zeitig die Commodore-Taste (unten ganz links), für die rech¬ 
ten Symbole die SHIFT-Taste drücken. 

Die Schwierigkeit für mich liegt nun darin, daß ich Ihnen 
im Text des Kurses diese speziellen Symbole nicht ohne 
weiteres angeben kann. Diese Commodore-spezifischen 
Zeichen und Symbole hat das Fotosatzsystem verständ¬ 
licherweise nicht zur Verfügung. 

Daher werde ich an ihrer Stelle folgende Symbole 
anwenden: 

- für die SHIFT-Taste <SHIFT> 

- für die Commodore-Taste < CBM > 

- (SHIFT W) bezeichnet das Symbol vorn rechts auf der 
W-Taste 

- <CBMZ> bezeichnet das Symbol vorn links auf der 
Z-Taste 


Ich zeige es am besten an einem Beispiel: 

—► PRINT "<SHIFT U> <SHIFT I>" 

(< RETURN> drücken) 

dann druckt der Computer aus den beiden Viertelkreisen 
der U- und I-Taste einen Halbkreis aus. 

Noch ein Beispiel: 

—*• PRINT " < CBM QXCBM W> " 

(< RETURN > drücken) 

ergibt ein großes H. 

Die Schreibweise zwischen Anführungszeichen erlaubt 
uns, nicht nur Buchstaben und deren umgeschaltete grafi¬ 
sche Zeichen, sondern auch Ziffern und alle Symbole aus- 
zuPRINTen. 

Verzeihen Sie mir bitte dieses saloppe Computer¬ 
deutsch. Eigentlich ist es ja nicht sehr schön, was wir da mit 
der deutschen Sprache machen und ich müßte mich 
eigentlich schämen, daß ich derartige Wortschöpfungen 
verwende. Aber abgesehen davon, daß Computerdeutsch 
gewisse Vorgänge sehr kurz und präzise ausdrückt, vertei¬ 
dige ich mich gern damit, daß andere Gruppen unserer 
Gesellschaft ja auch ihre eigenen Ausdrücke haben, wie 
die Segler, Musiker und Jäger. Bei den letzteren meine ich 
natürlich nicht das Jägerlatein. 

Wo waren wir stehen geblieben? Ach ja, beim PRINTen 
von Ziffern und Symbolen als Strings. 

—► PRINT "()* (<RETURN> drücken) 

Diese Anweisung druckt die beiden Klammern ohne 
SYNTAX ERROR aus. Alle Pfeile, Sterne, Interpunktionen 
und arithmetischen Symbole sind willig ausdruckbar, wenn 
sie in Anführungszeichen eingepackt sind. 

A propos Interpunktionen! Wir haben gelernt, daß mit 
dem Semikolon Stichwörter (Variable) voneinander 
getrennt werden können, selbst wenn sie hintereinander 
bei derselben PRINT-Anweisung stehen. 

Zwischen Anführungszeichen verlieren sie diese Wir¬ 
kung; sie sind dann nichts anderes als grafische Zeichen. 
Geben Sie ein: 

—*• A = 3 ( <RETURN> ) 

—B = 12 (<RETURN>) 

—► C = 17 ( < RETURN > ) 

—► PRINT A;B;C; "A;B;C" ( <RETURN> ) 

Zuerst wird der Wert der drei Variablen A, B und C neben¬ 
einander ausgedruckt, gefolgt von den 5 Symbolen zwi¬ 
schen den Anführungszeichen. 

Mit dem Komma und seiner verschiebenden Wirkung ist 
es ebenso. 

Und Ziffern? Ziffern gehen auch, aber sie gingen ja vor¬ 
her schon, ohne Anführungszeichen. 

Da ist aber ein ganz kleiner Unterschied. Passen Sie auf: 
—► PRINT 123 (< RETURN >) 

—► PRINT "123" (< RETURN >) 

- Der erste PRINT-Befehl versteht die Ziffern 123 als Zahl 
und reserviert, wie früher schon besprochen, eine Stelle 
vorher für das Vorzeichen. 

- Der PRINT-Befehl mit Anführungszeichen versteht die 
Ziffern 123 als String, der natürlich kein Vorzeichen 
braucht und daher auch keine Platzreservierung 
bekommt. 

Dieser feine Unterschied ist recht wichtig, wenn Zahlen¬ 
tabellen oder Zahlengrafiken erzeugt werden sollen. Wir 
stoßen später sicher noch darauf. 

Bevor ich ein weiteres Fazit ziehe, möchte ich Ihnen eine 
vorläufig letzte Anwendung des PRINT-Befehls zeigen. 

Wir haben gesehen (und angewendet), daß eine auf den 
Bildschirm geschriebene Zeile erst dann zu einem Befehl 
für den Computer wird, wenn sie mit dem Drücken der 
RETURN-Taste »abgeschlossen« wird. Wir haben daher 
immer nur einen einzigen Befehl in eine Zeile geschrieben. 
Die Frage stellt sich natürlich: 




SONDERHEFT 19 







GRUNDLAGEN 


C64 


Können wir mehrere Befehle in 
eine einzige Zeile schreiben?? 

Wie immer - probieren geht über studieren! Geben Sie 
ein: 

—*• PRINT "1.BEFEHL" PRINT "2.BEFEHL" 

—► drücken Sie die RETURN-Taste 

Nun, SYNTAX ERROR sagt uns, daß diese Schreibweise 
nicht erlaubt ist. 

Wie bei mehreren Variablen brauchen wir bei mehreren 
Befehlen auch ein Symbol zur Trennung. Bei Befehlen ist 
dies der Doppelpunkt. Fügen Sie bitte zwischen die beiden 
PRINT-Befehle oben einen Doppelpunkt ein und drücken 
Sie nochmal auf Return. 

Es muß also dastehen: 

—► PRINT "1.BEFEHL" : PRINT "2.BEFEHL" 

Jetzt stehen die beiden »Befehle« ausgedruckt da - 
untereinander! 

Durch den Doppelpunkt werden die zwei PRINT-Befehle 
so behandelt, als stünden sie in zwei getrennten Zeilen. 

Und damit wird auch unsere anfängliche Rechnerei 
wesentlich einfacher - ich hoffe, Sie erinnern sich noch. 
Sonst schauen Sie bitte nochmal am Anfang nach. 

Für die Berechnung der Summe 3 + 2 brauchen wir nur 
eine Zeile: 

—► SUMME = 3 + 2 : PRINT SUMME 
(< RETURN> drücken) 

Damit soll’s erstmal genug sein. Ich glaube, Sie haben 
jetzt eine ganze Reihe von Regeln gelernt, die für die ersten 
Schritte der Programmierung eines Commodore- 
Computers sehr wichtig sind. 


FAZIT 

1. Buchstaben werden vom PRINT-Befehl als Variable ein¬ 
gestuft, und entsprechend wird ihr Wert ausgedruckt. 

2. Ziffern und Zahlen werden vom PRINT-Befehl als arith¬ 
metische Ausdrücke gewertet und erhalten dementspre¬ 
chend ein Vorzeichen. Das positive Vorzeichen wird 
nicht ausgedruckt, eine Leerstelle ist dafür vorhanden. 

3. Alle Symbole der Tastatur, welche zwischen Anfüh¬ 
rungszeichen stehen, werden vom PRINT-Befehl als 
graphische Zeichen erkannt und formgetreu ausge¬ 
druckt. Sie werden Zeichenketten beziehungsweise 
Strings genannt. 

4. Um mehrere Befehle in eine einzige Zeile schreiben zu 
können, müssen sie durch einen Doppelpunkt vonein¬ 
ander getrennt sein. 

5. Schreibfehler oder inkorrekte Anweisungen quittiert der 
Computer mit der Fehlermeldung SYNTAX ERROR. 


Lektion 4: Was ist ein Programm? 


Bislang haben wir den Computer so benutzt, als wäre er ein 
Taschenrechner. 

Wir haben alle Angaben, Befehle und so weiter direkt ein¬ 
getippt; und der Computer hat sie nach dem Drücken der 
RETURN-Taste direkt ausgeführt. 

Ich habe mit Absicht das Wort direkt gleich zweimal ver¬ 
wendet. Diese Art des Betriebs wird nämlich Direkt-Modus 
genannt. 

Im Gegensatz dazu steht der sogenannte Programm- 
Modus. 

Jetzt also taucht das Schlagwort Programm zum ersten 
Mal auf. Haben Sie schon sehnlich darauf gewartet? Es 
wäre kein Wunder, wollen wir doch Programmieren lernen. 

In meinem alten Konversationslexikon steht unter Pro¬ 
gramm: Festfolge. Sie wissen, was damit gemeint ist, näm¬ 
lich eine detaillierte Angabe der einzelnen Darbietungen 


und Aktivitäten einer Veranstaltung in ihrer genauen zeitli¬ 
chen Reihenfolge. 

Diese Definition läßt sich gut auf einen Computer über¬ 
tragen. 

Wenn ein Computer viele Befehle in einer bestimmten 
Reihenfolge nacheinander ausführen soll, müssen sie ihm 
als »Festfolge« vorgegeben sein. Diese Festfolge muß er 
auswendig kennen - was für ihn kein Problem bedeutet, 
besitzt er doch ein gutes Gedächtnis. 

Dieses »Gedächtnis« haben wir ja schon kennengelernt. 
Die im Direkt-Modus eingegebenen Werte von Stichwör¬ 
tern (Variablen) hat er in seinem Speicher festgehalten und 
wir konnten sie jederzeit abfragen. 

Ein Computer hat aber auch einen Programm-Speicher, 
in welchem er ein aus mehreren Befehlen bestehendes 
Programm festhält. 

Alles, was wir tun müssen, ist, ihm die Befehle und ihre 
Reihenfolge einzugeben. Wie tun wir das? 

Die Angabe der Reihenfolge ist sehr simpel. Wir geben 
einfach jeder Zeile, in der ein oder mehrere Befehle stehen, 
eine Nummer. 

Die Eingabe der Befehle geht genauso wie vorher - mit 
der RETURN-Taste. Nur - vorher hat der Computer den 
Befehl sofort ausgeführt. Wenn aber eine Nummer davor¬ 
steht, dann führt er den Befehl nicht aus, sondern steckt ihn 
in seinen Programmspeicher. 

Das machen wir jetzt gleich einmal. Geben Sie bitte 
unsere allerersten Rechenanweisungen mit Zeilennum¬ 
mern ein: 

—► 1 SUMME = 3 + 2 ( < RETURN > ) 

—► 2 PRINT SUMME (< RETURN >) 

Siehe da, er hat nichts ausgeführt und ich behaupte, die¬ 
ses kleine Programm steht jetzt im Programmspeicher. 

Ich. l'^.nn das auch beweisen. Es gibt einen Befehl in 
Basic, aer alles, was im Programmspeicher steht, in der 
Reihenfolge der Zeilennummern auf dem Bildschirm aus¬ 
druckt. Er heißt 

LIST 

was auf deutsch soviel wie »auflisten« bedeutet. 

—► Löschen Sie den Bildschirm mit der CLR-Taste 
—► Tippen Sie direkt das Wort LIST ein und drücken Sie 
die RETURN-Taste. 

Die beiden Anweisungen samt Nummer erscheinen auf 
dem Bildschirm. Was zu beweisen war. 


Basic-Befehl Nr. 3 LIST 

- druckt den Inhalt des Programmspeichers auf dem Bild¬ 
schirm aus. • ' 

- Durch Angabe der Nummer oder eines Nummernberei¬ 
ches können einzelne Befehle oder bestimmte Pro¬ 
grammierte separat ausgedruckt werden. 

- Durch den Befehl LIST wird das Programm nicht 
gelöscht. 


Den ersten Satz dieser Befehlsbeschreibung haben wir 
ja schon praktiziert. Den zweiten Satz möchte ich vorläufig 
erst mal so stehen lassen. Zu seiner Erprobung brauchen 
wir längere Programme und die haben wir vorerst noch 
nicht. 

So, unser Programm, bestehend aus zwei Befehlen, hat 
der Computer gespeichert. Jetzt soll er es ausführen! 

Unsere alte Methode, den Computer hinter dem Ofen 
hervorzuscheuchen, war der Tritt mit der RETURN-Taste. 
Diese bringt uns hier aber überhaupt nichts. Was wir brau¬ 
chen ist ein Befehl, der den Computer veranlaßt, das Pro¬ 
gramm auszuführen. Ein derartiger Befehl wird uns von 
Basic geboten. Er heißt 

RUN 

was mit »loslaufen« übersetzt werden könnte. 
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Basic-Befehl Nr. 4 RUN 

- startet ein im Programmspeicher des Computers befind¬ 
liches Programm. 

- Mit RUN wird ein Programm nicht gelöscht. Der RUN- 
Befehl kann beliebig oft wiederholt werden. 


—► Tippen Sie direkt das Wort RUN ein und drücken Sie 
die RETURN-Taste. 

Und wie der Blitz, so schnell können Sie gar nicht 
schauen, steht das Resultat auf dem Bildschirm. 

Na ja, sagen vielleicht einige Skeptiker unter Ihnen, im 
Direkt-Modus vorhin ging das auch nicht viel langsamer, 
besonders die Einzeiler-Version mit dem Doppelpunkt. 

Richtig, aber wir haben ja nur zwei Befehle verwendet. 
Nehmen Sie mal 20 Befehle, da sieht die Sache schon 
anders aus. Abgesehen von der Geschwindigkeit gehen 
die überhaupt nicht in eine Zeile - und was dann? 


FAZIT 

1. Der Computer hat einen Speicher mit mehreren 
getrennten Bereichen. Alle Variablen und ihre jeweiligen 
Werte stehen im Variablenspeicher. Programmzeilen 
stehen im Programmspeicher. 

2. Immer wenn die RETURN-Taste gedrückt wird, über¬ 
prüft der Computer die Zeile, in der sich gerade der Cur¬ 
sor befindet. Beginnt die Zeile mit einer Nummer, wird 
sie als Programmzeile erkannt und im Programmspei¬ 
cher abgelegt. 

Hat sie keine Nummer am Anfang, dann führt sie der 
Computer im Direkt-Modus sofort aus. 

3. Mit dem Basic-Befehl LIST werden alle im Programm¬ 
speicher stehenden Zeilen in Reihenfolge der aufstei¬ 
genden Zeilennummern auf dem Bildschirm ausge¬ 
druckt. 

4. Ein Programm wird mit dem Basic-Befehl RUN gestar¬ 
tet. 


Nun sollten wir uns schleunigst an ein längeres Pro¬ 
gramm wagen. Natürlich verwenden wir nur Dinge, die wir 
bisher schon verwendet, beziehungsweise besprochen 
haben. 

Lektion 5: Ein erstes Programmbeispiel 


Zuerst brauchen wir einen Plan, was programmiert oder 
besser gesagt, was vom Computer gemacht werden soll. 
Ich schlage dazu eine Aufgabe mit folgenden Teilen vor: 

1. Unter dem Stichwort A sollen zwei Zahlen multipliziert 
werden 

2. Unter den Stichwort B sollen zwei Zahlen dividiert wer¬ 
den 

3. Das Stichwort C sei die Differenz der Werte von A und 
von B 

4. Der Wert von A soll nicht als Zahl, sondern als Gleichung 
ausgedruckt werden. 

5. Auch der Wert von B soll als Gleichung ausgedruckt wer¬ 
den. 

6. Dann folgt eine Textangabe, wie der Wert von C berech¬ 
net wird. Dabei sollen im Text die jeweiligen Werte von A 
und B automatisch eingesetzt werden. 

7. Als letztes wird auch der Wert von C als Gleichung aus¬ 
gedruckt. 

Das klingt schlimmer, als es ist. Wir müssen es einfach 
Schritt für Schritt angehen. 

Für den Punkt 1 nehmen wir die Zahlen 24 und 3 
—► 1 A = 24 * 3 ( < RETURN > ) 

In dieser Zeile mit der Nummer 1 weisen wir dem Stich¬ 


wort A das Resultat der Multiplikation von 24 mal 3 zu. Wir 
hätten das auch mit dem Basic-Befehl LET machen kön¬ 
nen, aber wie gesagt, man kann ihn weglassen. 

Punkt 2 verlangt etwas Ähnliches, wir nehmen die Zah¬ 
len 16 und 8. 

—► 2 B = 16/8 ( < RETURN > ) 

Auch Punkt 3 macht keine Ausnahme, nur verwenden wir 
jetzt statt absoluter Zahlen die Stichwörter A und B. Der 
Computer muß selbst im Lauf des Programms die Werte für 
A und B im Speicher heraussuchen und einsetzen. 

—► 3 C = A - B ( < RETURN > ) 

Bis hierhin war alles so wie gehabt. Im Punkt 4 soll der 
Wert von A, also das Resultat aus Zeile 1 als »Gleichung« 
ausgedruckt werden. 

Was ich damit meine, ist schnell gesagt. Der Befehl 
PRINT A würde nur den Zahlenwert von A auf den Bild¬ 
schirm bringen. Ich möchte aber, daß das Programm diese 
5 Zeichen hinschreibt: 

A = 72 

Wie erreichen wir das ? 

Nun, die Zahl 72 ist der Wert von A, mit PRINT A zu erzie¬ 
len. Davor steht ein Text! Damit der PRINT-Befehl »A =« 
hinschreibt, müssen wir das als String schreiben, das heißt, 
wir müssen den Anführungszeichen-Modus anwenden. 
Das sieht dann so aus: 

—► 4 PRINT "A =" A (<RETURN>) 

Was zwischen den Anführungszeichen steht, druckt der 
Computer so aus, wie es ist. Das zweite A steht nackt da, 
also ist es ein Stichwort, dessen Wert der Computer direkt 
hinter den Text »A =« setzt - mit Vorzeichenstelle natürlich. 

Wenn Sie es nicht glauben oder es sich nicht vorstellen 
können, lassen Sie doch diesen ersten Teil des Programms 
gleich einmal laufen. Zur besseren Übersicht löschen Sie 
zuer*’ ien Bildschirm mit der CLR-Taste. 

Keine Angst, es wird nur der Bildschirm gelöscht, aber 
nicht das Programm im Programmspeicher. Um das nach¬ 
zuprüfen, LISTen Sie es aus. Wenn das Programm schön 
dasteht, lassen Sie es mit RUN und RETURN-Taste laufen. 

Auf Ihrem Bildschirm steht jetzt unter der Programm- 
Liste: 

A = 72 

Das ist also das Resultat der Zeile 4. Genauso machen 
wir es mit dem Punkt 5. 

—► 5 PRINT "B = " B (< RETURN >) 

Punkt 6 ist reiner Text, den ich in zwei PRINT-Befehle auf¬ 
teile, damit der Text in zwei getrennten Zeilen steht. 

—► 6 PRINT "C IST A MINUS B," (<RETURN>) 

—► 7 PRINT "DAS HEISST," A "WIRD UM" B 
"VERRINGERT." (<RETURN>) 

Zeile 6 besteht aus reinem Text - alles steht zwischen 
Anführungszeichen. Zeile 7 ist wieder etwas komplizierter, 
aber sie enthält im Grunde genommen nichts anderes als 
die Zeilen 4 und 5 vorher. Man muß nur die Anführungszei¬ 
chen richtig abzählen. Zwischen den ersten beiden wird 
Text ausgedruckt, inklusive dem Komma. Dann folgt der 
Wert der Variablen A - ohne Anführungszeichen natürlich. 
Zwischen den nächsten beiden Textteilen steht wieder ein¬ 
sam das Stichwort B, dessen Wert der Computer suchen 
und hier einsetzen muß. 

Auch jetzt ist es Ihnen schon erlaubt, einen vorläufigen 
Probelauf zu machen. 

Schließlich führen wir noch Punkt 7 aus, wofür wir wieder 
die Methode der Zeilen 4 und 5 anwenden: 

—*• 8 PRINT "C =" C ( <RETURN> ) 

Es empfiehlt sich immer, ein Programm nochmal als 
Ganzes aufzuLISTen. Also: Bildschirm löschen und LIST 
eingeben. 

Wir sehen dann auf dem Bildschirm: 

1 A = 24 * 3 
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2 B = 16/8 

3 C = A - B 

4 PRINT "A = " A 

5 PRINT "B = " B 

6 PRINT "C IST A MINUS B," 

7 PRINT "DAS HEISST,"A "WIRD UM" B 

"VERRINGERT" 

8 PRINT "C =" C 

Alle diejenigen, welche den PRINT-Befehl mit dem Fra¬ 
gezeichen abgekürzt haben, werden jetzt staunen. Trotz 
der Abkürzerei stehtim Programm-Ausdruck-auch Listing 
genannt - kein Fragezeichen, sondern das volle Wort 
»PRINT«. Das ist wieder die Tat des guten alten Editors, der 
flugs alles in seine rechte Bahn umlenkt und umkodiert. 

Wenn Sie beim Tippen keine Fehler gemacht haben, 
dann dürfen Sie das Programm laufen lassen. 

Wenn Sie einen Fehler entdeckt haben, dann nutzen Sie 
einfach den Editor aus und korrigieren Sie den Fehler direkt 
in der Zeile, wo er auftritt. Nach der Reparatur nicht die 
Zeile verlassen, sondern zuerst RETURN drücken, damit 
die neue, korrigierte Zeile an die Stelle der alten falschen 
Zeile, die ja dieselbe Nummer hat, gespeichert wird. 

So, jetzt hindert uns aber niemand mehr am RUN (und 
natürlich RETURN-Taste). 

Auf Ihrem Bildschirm muß jetzt folgendes Resultat ste¬ 
hen: 

A= 72 

B= 2 

C IST A MINUS B, 

DAS HEISST, 72 WIRD UM 2 VERRINGERT 

C= 70 

READY. 

Ja, was wollen Sie machen, wenn das Programm noch 
immer nicht das tut, was es soll? 

Als allererstes nicht verzweifeln! Tippfehler treten immer 
wieder auf, die der Computer in seiner Perfektion eben 
sofort merkt. Da er aber keine eigene Intelligenz hat, tut er 
wirklich nur genau das, was wir ihm anschaffen - mit allen 
Fehlern. 

Eine Fehlersuche kann oft sehr mühsam sein, besonders 
bei langen und komplexen Programmen. 

Nun, in unserem Fall dürfte es nicht allzu schwer sein, 
Zeile für Zeile alle Buchstaben und Symbole durchzuge¬ 
hen, bis Sie den Fehler gefunden haben. 

Später, in Lektion 34, werden wir noch Methoden der 
Fehlersuche kennenlernen; jetzt möchte ich Sie noch nicht 
damit belasten. 

Ich möchte vielmehr, daß Sie noch ein bißchen mit dem 
Programm spielen. Verändern Sie die Zahlenwerte in den 
Zeilen 1 und 2 durch direktes Überschreiben - aber immer 
mit <RETURN > abschließen, sonst bleibt der alte Wert 
erhalten. 

Sie brauchen dann nicht erneut RUN eintippen, es steht 
ja noch da. Fahren Sie mit dem Cursor drauf und drücken 
Sie die RETURN-Taste. Sofort wird das Programm wieder 
ausgeführt und wie mit Geisterhand erscheinen neue Zah¬ 
len an den Stellen der Variablen. 

Aber Achtung!! Die Werte auf dem Bildschirm werden 
nur überschrieben. Wenn der neue Wert kürzer ist als der 
alte, dann bleibt der »längere« Rest des alten Wertes ste¬ 
hen; das kann zur, Verwirrung führen. 

Das passiert dadurch, daß dem Computer ja keine 
Anweisung gegeben worden ist, vor der Berechnung den 
Bildschirm zu löschen. Diese Anweisung kommt erst später 
in unser Lehrprogramm. 

Beachtenswert ist, wie viele Zeichen in einer Programm¬ 
zeile stehen dürfen. 40 werden Sie vielleicht sagen - aber 
nein: Eine mit Nummer als Programmzeile gekennzeich¬ 


nete »logische« Zeile besteht aus 2 »echten« Bildschirmzei¬ 
len und enthält somit maximal 80 Zeichen. 

Ein anderes »Experiment« besteht darin, die Zeilennum¬ 
mer einer Befehlszeile zu ändern. 

—► Fahren Sie mit dem Cursor auf die 8 dieser Zeile 
Überschreiben Sie die 8 mit der Ziffer 9 und drücken 
Sie < RETURN > 

Wir haben jetzt eine neue Programmzeile geschaffen, 
mit identischem Inhalt wie die alte Zeile 8. 

—► Geben Sie LIST und RETURN ein. 

Siehe da, wir haben eine neue Zeile 9, aber die alte Zeile 
8 ist auch noch da, natürlich, denn wir haben sie ja durch 
das Überschreiben nicht gelöscht. 

Das Löschen einer Zeile geht ganz einfach: 

—► Tippen Sie die Nummer der Zeile, in unserem Falle 
eine 8 in eine freie Zeile des Bildschirms und drücken 
Sie < RETURN > 

Wir haben also eine Zeile 8 ohne Text beziehungsweise 
ohne Befehle eingegeben. Da dem Rechner sein Speicher¬ 
platz sehr kostbar ist, ignoriert er eine solche nichtssa¬ 
gende Zeile - sie ist weg. Überprüfen Sie es mit LIST. 

Jetzt haben wir ein Programm, in dem in der Reihenfolge 
der Zeilen eine Nummer fehlt. Was macht das? Mit RUN 
können Sie sich überzeugen, daß das dem Computer völlig 
egal ist. Er braucht nämlich nur Zeilennummern in aufstei¬ 
gender Folge, Lücken überspringt er einfach. 

Das bedeutet aber, daß wir unser Programm oben auch 
mit den Zeilennummern 10..20..30.. und so weiter hätten 
schreiben können. In der Tat möchte ich Ihnen diese Vorge¬ 
hensweise empfehlen, da sie ein späteres Einfügen von 
weiteren Programmzeilen erlaubt. Wir werden das noch 
üben. 


1. fnnei.nalb eines PRINT-Befehls können Variable und 
Zeichen beliebig miteinander gemischt werden. Wichtig 
ist nur, daß Zeichen immer innerhalb von Anführungs¬ 
zeichen stehen müssen. 

2. Ein bereits im Progammspeicher stehendes Programm 
kann auf dem Bildschirm jederzeit abgeändert werden. 
Es gelten bei dem »Überschreiben« alle Regeln und 
Möglichkeiten des Editors. Eine Änderung muß mit 
Return abgeschlossen werden. 

3. In dem Programmspeicher wird die jeweils letzte mit 
< RETURN > eingegebene Version einer Zeile gespei¬ 
chert. 

4. Zeilennummern lassen sich auf dieselbe Art und Weise 
verändern. Eine Zeile wird durch Eingabe lediglich der 
Zeilennummer, also ohne Text, gelöscht. 

5. Zeilennummern brauchen nicht direkt aufeinander zu 
folgen. Lücken in der Zahlenfolge werden übersprun¬ 
gen. 

6. Es empfiehlt sich, ein Programm mit Zeilennummern zu 
versehen, die zum Beispiel jeweils um 10 voneinander 
verschieden sind. Das erleichtert das spätere Einfügen 
von zusätzlichen Programmzeilen. 

7. Eine Programmzeile kann maximal 80 Zeichen enthal¬ 
ten. Bei späterem Vergrößern von bestehenden Zeilen 
schiebt der Editor alle Zeilen automatisch nach unten, 
um Platz zu schaffen. 


Wir haben ein erstes kleines Programm geschrieben. 
Aber sein Wortschatz ist noch sehr begrenzt - LET und 
PRINT. Die beiden anderen Befehle, die wir kennen, näm¬ 
lich LIST und RUN werden nur im Direkt-Modus verwendet. 
Bevor wir weitermachen, empfehle ich Ihnen, das alte Pro¬ 
gramm aus dem Speicher des Computers zu entfernen und 
ihn frei zu machen für ein neues Programm. 

Verwechseln Sie das bitte nicht mit dem Löschen des 
Bildschirms. Zur Klärung: 
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- Die CLR/HOME-Taste geSHIFTet löscht den Bildschirm; 
ein Programm im Speicher bleibt davon unberührt. 

- Durch Aus- und Wiedereinschalten des Computers 
löschen Sie sowohl den Bildschirm als auch den Spei¬ 
cher des Computers, in welchem das Programm gespei¬ 
chert ist. Der Computer meldet sich dann mit seinen 
Einschalt-Überschriften. 

- Es gibt auch einen Basic-Befehl, der ein Programm aus 
dem Speicher hinauswirft, ohne den Bildschirm zu 
löschen. Er heißt 

NEW 

Probieren Sie es bitte aus. 

—► Geben Sie eine beliebige Programmzeile (mit Num¬ 
mer) ein, zum Beispiel: 

20 PRINT"ABCDE" 

—► löschen Sie mit der CLR-Taste den Bildschirm 
geben Sie direkt LIST ein 

Jetzt erscheint die obige Zeile 20 wieder. 

—► geben Sie direkt NEW ein und nach der RETURN- 
Taste wieder den Befehl LIST 
Die Programmzeile 20 ist verschwunden 


Basic-Befehl Nr. 5 NEW 

- macht den Programmspeicher frei für die Eingabe eines 
neuen Programms 

- ein »altes« im Speicher sitzendes Programm wird 
dadurch zwar nicht gelöscht, aber es kann nach dem 
NEW-Befehl nur noch unter ganz bestimmten Umstän¬ 
den und nur mit besonderen Tricks wieder verfügbar 
gemacht werden 


Seien Sie also vorsichtig mit diesem Befehl, immer erst 
überlegen, bevor Sie NEW mit der RETURN-Taste 
abschließen, hat er doch eine so gut wie endgültige Wir- 1 
kung. Salopp ausgedrückt »löscht« er den Programm¬ 
speicher. 

Auch dieser Befehl wird fast ausschließlich nur im Direkt- 
Modus eingesetzt. 


Lektion 6: Mehr über Stichwörter/Viariable 


Ich habe Ihnen erklärt, daß wir mit Variable die Stichwörter 
bezeichnen, unter denen der Computer sich Zahlenwerte 
merkt und unter denen sie auch wieder aus dem Speicher 
hervorgeholt werden können. 

Des öfteren wird das alles mit Schachteln verglichen, auf 
die der Name einer Variablen geschrieben wird. Ein Wert, 
welcher der Variablen zugeordnet wird, kommt in die 
Schachtel mit dem richtigen Namen hinein. Eine Kopie des 
Wertes kann jederzeit aus der Schachtel herausgeholt wer¬ 
den, wenn man ihren Namen kennt. Der Wert bleibt 
solange in der Schachtel, bis er durch einen neuen ersetzt 
wird. 

Es gibt mehrere Arten von Variablen, von denen wir zwei 
besprechen wollen. 

6.1 Numerische Variable 

Diesen Typ haben wir bislang verwendet. Er enthält nur 
Zahlen: ganze Zahlen (325), Dezimalbrüche (0.325) und 
negative Zahlen (-325, -0.325). 

Bei der Wahl des Namens der Variablen, der vorn auf die 
Schachtel geschrieben wird, sind wir ziemlich frei. Er muß 
nur immer mit einem Buchstaben anfangen. Die nachfol¬ 
genden Zeichen können Buchstaben, Ziffern oder grafi¬ 
sche Zeichen sein. 

Wir haben bisher X, SUMME, PRODUKT etc. verwendet. 
Wir dürfen aber auch B23X oder F5 nehmen. 

Der Länge des Variablen-Namens ist theoretisch nur 


durch die Anzahl der verfügbaren Zeichen in der Pro¬ 
grammzeile eine Grenze gesetzt. Praktisch ist das aber 
ohne Bedeutung, da der Computer nur die ersten beiden 
Zeichen als Namen verwendet. So vielsagend zum Bei¬ 
spiel in einem Programm die Variablen-Namen »PRO¬ 
DUKT« und »PROFIT« sein könnten, der Computer erkennt 
nur »PR« und nimmt an, es handle sich um dieselbe Varia¬ 
ble. Also Vorsicht!!! 

6.2 String-Variable 

So nennen wir den zweiten Typ. Hier geht es nun um 
Schachteln, in die wir Buchstaben, Zeichen, Wörter, ja 
sogar ganze Sätze bis zu einer maximalen Länge von 255 
Zeichen hineingeben dürfen. 

Diese Aneinanderreihung von Zeichen bezeichnen wir, 
wie schon erwähnt, mit »Zeichenketten« oder mit dem eng¬ 
lischen Wort »String«, das sich wegen seiner Kürze allge¬ 
mein durchgesetzt hat. Daher auch der Name »String- 
Variable«. 

Der Name einer String-Variablen ist genauso aufgebaut 
wie der einer numerischen Variablen, nur muß am Ende 
immer das Dollar-Zeichen »$« - die geSHIFTete 4-Taste - 
stehen. 

Der Vergleich der beiden Variablentypen sieht so aus: 

—► 10 A = 25 

20 A$ = "ZEICHENKETTE" 

30 PRINT A 
40 PRINT A$ 

Sie sehen, selbst bei gleichem Namen, nämlich A, unter¬ 
scheidet der Computer exakt zwischen der numerischen 
Variable A und der Stringvariable A$. 

Strings und Stringvariable werden uns fortan laufend 
begegnen. Deswegen schlage ich zur Übung noch ein paar 
BeiSDiele vor. 

Löschen Sie bitte das obige Programm mit NEW und 
geben Sie die folgenden Programmzeilen ein, wobei Sie 
genau auf Semikolons und Doppelpunkte achten müssen. 

—► NEW 

10 T$="HOLZ" 

20 U$="FEUER" 

30 W$="7" 

40 X$="5" 

50 PRINT U$:PRINT T$ 

60 PRINT U$;:PRINT T$ 

70 PRINT T$;:PRINT U$ 

80 PRINT W$;:PRINT X$ 

90 PRINT W$ X$ 

Diese Programmzeilen ergeben auf dem Bildschirm fol¬ 
gendes Bild: 

FEUER 

HOLZ 

FEUERHOLZ 

HOLZFEUER 

75 

75 

In den Zeilen 10 bis 40 werden 4 String-Variable definiert 
und ihnen werden zwei Wörter und zwei Ziffern zugewie¬ 
sen. Die Ziffern sind nicht Zahlenwerte, sondern ebenfalls 
Strings, da sie zwischen Anführungszeichen stehen. 

Zeile 50 enthält zwei - durch den Doppelpunkt getrennte 
- PRINT-Befehle, die untereinander die Strings der beiden 
Variablen U$ und T$ ausdrucken. 

Zeile 60 ist fast identisch mit Zeile 50, und doch ist ihr 
Resultat grundlegend verschieden, da beide Strings 
nebeneinander in einem Wort geschrieben werden. Der 
winzige Unterschied ist das Semikolon am Ende des ersten 
PRINT-Befehls. Wir haben das Semikolon schon kennen¬ 
gelernt, als Trennzeichen bei der Aneinanderreihung von 
mehreren numerischen Variablen innerhalb eines einzigen 
PRINT-Befehls. 
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Hier bei den Strings hat es eine entgegengesetzte Wir¬ 
kung. Es klebt nämlich die Strings zweier Variablen, die in 
getrennten PRINT-Befehlen stehen, aneinander. 

Ich weiß, das sieht verwirrend aus. Aber glauben Sie mir, 
diese »Rechtschreibregeln« werden Ihnen sehr rasch in 
Fleisch und Blut übergehen. 

Zeile 70 ist ein weiteres Beispiel für den Alleskleber 
Semikolon, nur diesmal in umgekehrter Reihenfolge der 
Strings. 

Zeile 80 zeigt Ihnen, daß die Ziffern 7 und 5 in derTat nicht 
als Zahlenwerte, sondern als Strings behandelt werden. 
Numerische Variable werden , wie Sie sich erinnern, mit 
Leerzeichen für das Vorzeichen und für den Abstand aus¬ 
gedruckt, Strings dagegen nicht. Und da ist es egal, ob der 
String zufällig eine Ziffer ist. 

Zeile 90 schließlich zeigt, daß wie bei den numerischen 
Variablen auch mehrere String-Variable hinter einen einzi¬ 
gen PRINT-Befehl geschrieben werden können. Da das 
$-Zeichen das Ende der String-Variablen eindeutig fest¬ 
legt, kann bei Strings das Semikolon weggelassen werden. 
Die nächsten drei Zeilen erweitern das Programm: 

—► 100 Y$=T$+U$ 

110 Z$=U$+T$ 

120 PRINT Y$:PRINT Z$ 

Die beiden String-Variablen T$ und U$ werden zu einem 
neuen String Y$ und in umgekehrter Reihenfolge zu Z$ 
zusammengebaut (Zeile 100 und 110). Zeile 120 druckt uns 
das Resultat aus. 

Zum Schluß will ich noch meine Behauptung von oben, 
daß nämlich nur die beiden ersten Zeichen einer Variablen 
erkannt werden, beweisen. 

—► 130 PR0DUKT=25:PRINT PR 
140 PR0FIT= 3:PRINT PR 
150 PRINT PRODUKT 

Zeile 130 weist der numerischen Variablen »PRODUKT« 
den Zahlenwert 25 zu und druckt ihn aus, wobei die ersten 
beiden Buchstaben der Variablen genügen, um sie im Spei¬ 
cher zu finden. 

Zeile 140 tut dasselbe für die Variable »PROFIT« mit dem 
Zahlenwert 3. Und siehe da, die Variable PR, die vorher 
noch 25 war, wird jetzt mit dem Wert 3 ausgedruckt. Daß wir 
tatsächlich in Zeile 140 der Variablen PRODUKT einen 
neuen Wert zugewiesen haben, obwohl wir den Variabien- 
Namen PROFIT gewählt haben, beweist uns Zeile 150, die 
unter PRODUKT dennoch die 3 ausdruckt. 

Übrigens, wenn Sie nur der Ablauf der letzten drei Zeilen 
des Programms interessiert, können Sie eine Eigenschaft 
des Befehls RUN ausnützen: 

Wenn Sie 
RUN 130 

eingeben, läuft das Programm ab Zeile 130 los und läßt alle 
vorhergehenden Zeilen unbeachtet. 

Wenn Sie aber nach dem RUN eine Zeilennummer ange¬ 
ben, die im Programm nicht vorkommt, läuft das Programm 
nicht los, sondern es meldet sich der Computer mit der Feh¬ 
lermeldung »UNDEF'D STATEMENT« (undefined State¬ 
ment), was soviel heißt wie »Zeilennummer nicht definiert«. 


FAZIT 

1. Wir haben bisher zwei Typen von Variablen kennenge¬ 
lernt: 

- den »numerischen« Variablen weisen wir ausschließ¬ 
lich Zahlenwerte zu 

- den Stringvariablen, gekennzeichnet durch das 
$-Zeichen am Ende des Variablennamens, weisen wir 
ausschließlich Zeichen, Buchstaben oder ganze Folgen 
von ihnen zu. Diese Zeichen- und Buchstabenfolgen 
heißen »Zeichenketten« oder »Strings«. 


Zahlen sind auch zugelassen, nur werden sie wie Zei¬ 
chen (und nicht als Zahlenwerte) behandelt. 

2. Die Zuordnung von Zahlen oder Strings zum falschen 
Variablentyp führt generell zu einer Fehlermeldung und 
oft auch zum Abbruch des Programms. 

3. Das Semikolon am Ende eines PRINT-Befehls bewirkt, 
daß der nächste PRINT-Befehl, egal wo er steht, seinen 
Text direkt anschließend zum vorhergehenden druckt. 

4. Um ein Programm ab einer bestimmten Zeilennummer 
zu starten, wird diese Zeilennummer dem RUN-Befehl 
angehängt (RUN 600). 


LEKTION 7: Sprünge im Programm 


Bislang bestand ein Programm aus einzelnen Zeilen, die 
der Reihe nach abgelaufen sind. 

Ein Programm muß nicht so einfach sein. Es vermag 
auch Sprünge auf beliebige Zeilen durchzuführen. 

Dazu enthält die Sprache BASIC einen Befehl, der den 
Computer hüpfen läßt, und zwar auf eine mit diesem Befehl 
angegebene Programmzeile. Der Befehl lautet: 

GOTO (Zeilennummer) 

Er darf auch in der Form GO TO geschrieben werden. 
Auf deutsch bedeutet er GEHE NACH. 

Durch ihn veranlaßt, springt der Computer auf die ange¬ 
gebene Programmzeile und fährt dort mit dem Programm 
fort. 

Der Befehl GOTO darf auch im Direkt-Modus verwendet 
werden. 

Ich nehme an, Sie haben noch das letzte Programm mit 
den Strings (Zeile 10 bis 150) im Computer. Wenn Sie jetzt 
direk? » ltippen: 

—♦ GOTO 130 

springt der Computer auf die Zeile 130 und führt sie und die 
nachfolgende Zeile aus. Im Direkt-Modus wirkt er also wie 
der RUN-Befehl. 

Im Programm-Modus sieht der Befehl genauso aus, er ist 
halt nur mit einer Zeilennummer versehen: 

—► 65 GOTO 130 

Durch den Sprungbefehl in der neuen Zeile 65 rückt das 
Programm auf die Zeile 130 vor und überspringt die Zeilen 
70 bis 120. 

Der GOTO-Befehl kann als Zieladresse aber auch eine 
niedrigere Zeilennummer als er selbst haben. Dann springt 
er im Programm zurück und bildet so eine Schleife. Geben 
Sie bitte ein: 

—► 80 GOTO 60 

Dieser Sprungbefehl wiederholt die beiden Zeilen 60 und 
70 endlos lange oder aber bis Sie die STOP-Taste drücken. 


Basic-Befehl Nr. 6 GOTO 

- wird mit der folgenden Schreibweise verwendet: 

GOTO (Zeilennummer) 

- veranlaßt den Computer sowohl im Direkt- als auch im 
Programm-Modus, auf die hinter dem Befehlswort ste¬ 
hende Zeilennummer zu springen 

- erlaubt Sprünge sowohl auf höhere, als auch auf niedri¬ 
gere Zeilennummern; durch Rücksprünge können Pro¬ 
gramm-Schleifen erzeugt werden 

- fehlt die Zeilennummer des GOTO-Befehls im Programm, 
bleibt das Programm mit der Fehlermeldung »UNDEF'D 
STATEMENT ERROR« mit Angabe der Zeilennummer 
des falschen Befehls stehen. 


Die letzte Anwendung des GOTO-Befehls hat eine soge¬ 
nannte Endlos-Schleife erzeugt, aus der ein Computer von 
allein nicht mehr herauskommt. Sie ist natürlich ziemlich 


60 


SONDERHEFT 19 










Illustration: Roll Boyke 


C64 


GRUNDLAGEN 


sinnlos, denn außer zum Füllen des Bildschirms mit stets 
denselben Zeichen nützt sie uns gar nichts. 

Da aber Programmschleifen sehr nützliche Werkzeuge 
sein können, soll ihnen eine eigene Lektion gewidmet sein. 

LEKTION 8: Schleifen und Prüfungen 


Mit Schleifen können wir zum Beispiel zählen. Das will ich 
Ihnen zeigen. Geben Sie ein: 

—► NEW 

10 x=x+i 

20 PRINT X 

Nach RUN druckt uns die Zeile 20 eine 1 aus. Am Anfang 
des Programms ist der Variablen X noch keine Zahl zuge¬ 
ordnet, also ist sie 0. In Zeile 10 wird 1 dazugezählt, was 1 
ergibt. 

Das ist beileibe nicht trivial, denn jetzt ergänzen wir das 
Programm mit: 

—► 40 GOTO 10 

Die dadurch gebildete Schleife wiederholt den Vorgang, 
und in Zeile 10 wird bei jedem Durchgang die Variable X um 
1 erhöht. 



Dieses kurze Programm erzeugt eine Zählschleife, die 
eine endlose Zahlenkolonne über den Bildschirm sausen 
läßt. Mit der CTRL-Taste können Sie diesen Lauf verlangsa¬ 
men, mit der STOP-Taste abbrechen. 

Diese endlosen Schleifen sind aber wie Autobahnen 
ohne Ausfahrt. Man kommt leicht drauf, und wer drauf ist, 
kommt nicht runter. 

Wir brauchen also eine Methode, die den Aussprung aus 
einer Schleife ermöglicht. Dabei wollen wir aber angeben 
können, wann oder wo wir ausspringen. 

In einer Zählschleife wäre das denkbar beim Erreichen 
einer bestimmten Zahl, zum Beispiel 15. 


Prüfung ohne Noten 


X=3 ist die Prüfbedingung, PRINT "DREI" die Aktion. 
Der Befehl prüft also, ob die Prüfbedingung erfüllt ist 
oder nicht. Man sagt auch, er prüft, ob sie »wahr« oder 
»falsch« ist. 

- ist sie erfüllt, dann wird die hinter dem THEN stehende 
Aktion ausgeführt 

- ist sie nicht erfüllt, dann wird ungeachtet dessen, was 
noch in der Zeile steht, das Programm mit der nächsten 
Zeile fortgesetzt. 

Die Arbeitsweise sehen Sie am besten in unserem Bei¬ 
spiel. Fügen Sie bitte den Zeilen 10 und 20 die zwei folgen¬ 
den Zeilen 30 und 50 hinzu: 

—► 10 X=X+1 
20 PRINT X 

30 IF X=15 THEN GOTO 50 
40 GOTO 10 
50 PRINT"ENDE" 

Also, in Zeile 10 wird X zu 1, Zeile 20 druckt die 1 aus. 
Zeile 30 prüft, ob X bereits den Wert 15 erreicht hat. Dies 
ist nicht der Fall, deswegen geht das Programm in der 
nächsten Zeile - nämlich 40 - weiter. Zeile 40 springt auf 
Zeile 10 zurück, X wird um 1 erhöht und hat jetzt den Wert 
2. Die Bedingung in Zeile 30 ist aber noch immer nicht 
erfüllt. Also wiederholt sich der ganze Vorgang, solange, 
bis die Bedingung des IF-Befehls erfüllt ist. Erst wenn X den 
Wert 15 erreicht hat, tritt der THEN-Teil des Prüfbefehls in 
Kraft und führt das aus, was hinter dem THEN steht. In 
unserem Beispiel springt er mit GOTO 50 aus der Schleife 
heraus auf die Zeile 50. 

In Zeile 50 endet das Programm mit dem Ausdruck 
»ENDE«. 

Man muß bei der Festlegung der Prüfbedingung aufpas¬ 
sen, daß sie überhaupt auch auftritt. Wenn wir zum Beispiel 
in Zell*- 10 den Wert fürr X jeweils um 2 erhöhen, also die 
Zeile 10 so schreiben: 

—► 10 X=X+2 

ist die Schleife wieder endlos, weil 14 oder 16 erreicht 
wird, aber niemals 15. 

Das Problem ist lösbar mit einer Prüfung, ob X größer als 
15 geworden ist. Dazu existiert ein Zeichen » > «, das mit der 
geSHIFTeten Punkt-Taste erzeugt wird. 

—► 30 IF X > 15 THEN GOTO 50. 

Jetzt wird die Zeile erst bei der Zahl 16 verlassen. 

Als Prüfbedingung stehen uns mehrere mathematische 
und logische Ausdrücke zur Verfügung: 


ist gleich 
kleiner 

< 

ist ungleich 

< > 



Boole’sches UND 

AND 

kleiner oder gleich 

< = 

Boole’sches ODER 

OR 

gleich oder größer 

= > 

Negation 

NOT 


Basic kennt einen Befehl, der prüft, ob eine bestimmte, von 
uns festlegbare Bedingung erfüllt ist. Dann nämlich tut er, 
was man ihm vorgegeben hat. 

Der Befehl besteht aus den beiden Wörtern 
IF THEN 

auf deutsch WENN DANN. 

Die volle Schreibweise sieht so aus: 

IF (Prüfbedingung) THEN (Aktion) 

IF X=3 THEN PRINT "DREI" 


Die ersten 6 davon sprechen für sich selbst, die letzten 
3 werde ich in Lektion 31 behandeln. 

Mit der Ungleich-Bedingung können wir unsere Schleife 
sogar noch viel eleganter gestalten: 

—*• 30 IF X < > 15 THEN GOTO 10 
40 PRINT "ENDE" 

50 

Wir sparen Zeile 50 ein, weil die Prüfung immer erfüllt ist, 
bis X den Wert 15 erreicht hat. 

Für den IF-THEN-Befehl sind mehrere Schreibweisen 
erlaubt: 

1. Möglichkeit 

Zeile 30 dürfen wir vereinfacht schreiben: 

30 IF X < > 15 THEN 10 

oder 

30 IF X < > 15 GOTO 10 
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Anstelle von THEN GOTO kann auch THEN oder GOTO 
allein stehen. 

2. Möglichkeit 

Nach dem THEN kann auch ein anderer Basic-Befehl 
stehen: 

110 PRINT X 

120 IF X < > 15 THEN X=X+1 

130 GOTO 110 
140 PRINT "ENDE" 

In Zeile 120 wird die Zählvariable X direkt weitergezählt, 
womit derselbe Effekt erzielt wird wie im Programmteil vor¬ 
her (Zeile 10 bis 50). 

Nur mit dem ENDE klappt es noch nicht. Sobald nämlich 
X=15 ist, gilt die Bedingung in Zeile 120 nicht mehr - und 
die Zeile 130 kommt wieder an die Reihe, was wir ja nicht 
wollen. 

Um das zu vermeiden, muß die Zeile 120 so lauten: 

—► 110 PRINT X 

120 IF X <> 15 THEN X=X+1:G0T0 110 
130 (entfällt) 

140 PRINT "ENDE" 

Sie müssen also immer aufpassen und an die IF-THEN- 
Regeln denken: 

- wenn IF »wahr« ist, wird alles hinter THEN ausgeführt 

- wenn IF »falsch« ist, kommt die nächste Zeile zum Zuge 

3. Möglichkeit 

Mehrere Zählschleifen können unabhängig voneinander 
gleichzeitig ablaufen. Im folgenden Beispiel beginnt die 
erste Schleifenvariable X ab dem Wert 0 und wird bei jedem 
Durchlauf um 1 erhöht. Die zweite Schleifenvariable V 
beginnt ab 28 und wird stetig um 2 reduziert: 

—► 210 X=0:Y=28 
220 X=X+1 

230 Y=Y-2 S46R 

240 PRINT XjY 

Als Bedingung für das Ende wähle ich den Fall, wo X 
größer als Y geworden ist: 

—► 250 IF X < Y THEN 220 
260 PRINT "ENDE" 

Sobald X=10 und Y=8, ist die Prüfbedingung der Zeile 
250 erfüllt und das Programm bleibt stehen. 

4. Möglichkeit 

Mehrere Zählvariable können auch voneinander abhän¬ 
gig sein. Das folgende Programmbeispiel zeigt das auf ein¬ 
fache Weise. Obwohl diese verschachtelte Schleife keinen 
praktischen Wert hat, zeigt sie den Zusammenhang doch 
sehr eindrucksvoll: 

—► 310 X=2:Y=1 
320 X=X+Y-2 
330 Y=Y-X+3 

In Zeile 310 stehen die Anfangswerte der Zählvariablen, 
Zeile 320 und Zeile 330 enthalten die Formeln, nach denen 
in jedem Umlauf der Schleife die Werte von X und Y »weiter¬ 
gezählt« werden. 

Um das Resultat zu sehen, brauchen wir noch zwei Zei¬ 
len: 

—► 340 PRINT X;Y 
350 

360 GOTO 320 


vor, einmal bei Y=3 und noch einmal bei Y=0. Diese zweite 
Kombination wollen wir abfragen. Dazu nützen wir eine wei¬ 
tere Eigenschaft des IF-THEN-Befehls aus: 

Durch Hintereinanderstellen von mehreren IF- 
THEN-Befehlen kann eine Mehrfach-Prüfung 
erzielt werden. 

—► 350 IF X=4 THEN IF Y=0 THEN PRINT "ENDE" 

Im dritten Umlauf der Schleife ist die erste IF-Bedingung 
bereits erfüllt, aber nicht die zweite. Erst nach dem 

5. Umlauf bleibt die Schleife stehen. 


Basic-Befehl Nr. 7 IF..THEN 

- nach dem Befehlswort IF steht eine Prüfbedingung, nach 
dem Befehlswort THEN eine Aktionsanweisung 

- IF prüft, ob die Prüfbedingung erfüllt ist, wenn ja, dann 
wird die Aktionsanweisung und der Rest der Zeile ausge¬ 
führt, wenn nein, läuft das Programm mit der nächsten 
Zeile weiter 

- mehrere IF.THEN-Befehle können hintereinander 
gestellt eine Mehrfach-Prüfung bilden 

- bei IF..THEN GOTO (Zeilennummer) kann entweder das 
THEN oder das GOTO weggelassen werden 


Schleifen mit eigenem Befehl 


Wir haben die Schleifen bis jetzt mit Hochzählen einer 
Schleifenvariablen und Prüfen, ob die Aussprungsbedin¬ 
gung schon erreicht ist, programmiert. 

Basic stellt uns dafür einen sehr bequemen Befehl zur 
Verfügung. Er besteht aus 3 Wörtern: 

FOR..TO..NEXT 

Auf d' Jtsch läßt sich das übersetzen mit »Für..Bis..Der 
Nächste«. 

Ein Beispiel soll ihn erklären. Links steht die alte Zähl¬ 
schleife, rechts die neue Befehlsfolge. 

—► 10 X=X+1 10 F0R X=1 T0 10 

20 PRINT X 20 PRINT X 

30 IF X=10 THEN END 
40 GOTO 10 40 NEXT X 

Man sieht sehr schön den Zusammenhang. 

Die alte Methode der Definition einer immer um 1 höher¬ 
zählenden Variablen mitsamt einer Prüfung ist jetzt in einer 
Zeile mit den Befehlsteilen FOR TO zusammengefaßt. Die 
Prüfung ist eingebaut. 

Dem alten Rücksprung mit GOTO entspricht jetzt der 
Befehlsteil NEXT. 

Die FOR-NEXT Schleife hat immer die folgende Schreib¬ 
weise: 

FOR Schleifenvariable = Anfangswert 

T0 Endwert 

STEP Schrittweite 


(Programm innerhalb der Schleife) 

NEXT Schleifenvariable 
Die Schleife 

FOR T=0 T0 14 STEP 2 

setzt also die Schleifenvariabie T auf Null und zählt bis 14 


X und Y nehmen folgende Werte an: 


X_ 

Y 


2 1 2 4 5 4 2 1 


1 3 4 3 1 0 1 3 


usw. 


Man sieht, daß nach 6 Umläufen der Schleife die 
ursprünglichen Werte von X und Y wieder auftreten. 

Als Prüfbedingung erlaubt uns diese Schleife eine inter¬ 
essante Variante. Für X kommt die Zahl 4 gleich zweimal 


hoch, allerdings immer in Zweierschritten. Wenn STEP 
weggelassen wird, dann wird automatisch die Schritt¬ 
weite 1 genommen 

Eine rückwärtszählende Schleife sieht so aus: 

FOR T=l4 T0 0 STEP -1 

In diesem Fall muß die Schrittweite, weil negativ, immer 
angegeben werden. 

Interessant ist auch, daß die Schrittweite ein Dezimal¬ 
bruch sein kann. 
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—► 10 FOR X=1 TO 15 STEP 3-7 
20 PRINT X 
30 NEXT X 

ergibt die Zahlen 1, 4.7, 8.4, 12.1 - also jeweils um 3.7 
erhöht. 

Daraus ist ersichtlich, daß der NEXT-Befehl in der 
Schleife nicht prüft, ob die Schleifenvariable X den Endwert 
15 exakt erreicht hat, sondern ob sie größer ist. 

Auch der FOR-TO-NEXT-Befehl erlaubt uns, Schleifen 
zu »schachteln«. Was das bedeutet, zeigt uns das nächste 
Beispiel: 


10 FOR X=1 TO 3 

FOR Y=X TO X+2 
PRINT Y 
NEXT Y 


20 
30 
40 

50 NEXT X 

Die Zeilen 10 und 50 bilden die äußere Schleife. Die Zei¬ 
len 20 bis 40, die ich zur besseren Übersicht weiter einge¬ 
rückt habe, bilden die innere Schleife. 

Wir wollen nachvollziehen, was da abläuft. 

Sie sehen, daß die innere Schleife so oft wiederholt wird, 
wie es die äußere Schleife vorgibt. 

Der NEXT-Befehl hat noch zwei Feinheiten. Bei einer ein¬ 
zigen Schleife kann die Angabe der Schleifenvariablen hin¬ 
ter ihm wegfallen. Die folgende kleine Zeitverzögerungs¬ 
schleife demonstriert das: 

—*• FOR T=1 T0 500: NEXT 
Bei geschachtelten Schleifen stehen oft mehrere 
abschließende NEXT-Befehle hintereinander. Statt: 

40 NEXT Y 
50 NEXT X 

kann geschrieben werden: 

40 NEXT Y,X 

Dabei ist auf die Reihenfolge der Schleifenvariablen zu 
achten. Zuerst kommt immer die innere Variable. 

Neben allen diesen geschilderten Feinheiten hat die 
FOR-TO-NEXT-Schleife noch einen weiteren Vorteil 
gegenüber der Zählschleife mit IF-THEN: Sie ist wesentlich 
schneller in der Ausführungszeit. 

Basic-Befehl Nr. 8 FOR-TO STEP-NEXT 

- hinter FOR steht die Schleifenvariable mit ihrem zugewie¬ 
senen Anfangswert. Hinter TO steht der Endwert der 
Schleifenvariable 

- mit STEP kann die Schrittweite eingestellt werden. Sie 
kann auch negativ oder ein Dezimalbruch sein 

- rückwärts zählende Schleifen müssen immer eine nega¬ 
tive Schrittweite mit STEP angeben 

- mehrere Schleifen können geschachtelt werden. Die 
innere Schleife muß vor der äußeren abgearbeitet werden 

- bei NEXT kann die Schleifenvariable weggelassen wer¬ 
den, wenn dadurch keine Zweideutigkeiten mit anderen 
Schleifenvariablen entstehen 

- wenn mehrere NEXT-Befehle hintereinander auftreten, 
können ihre Schleifenvariablen durch Kommata getrennt 
hinter einem einzigen NEXT stehen. Die Reihenfolge 
»innere Variable vor äußerer Variable« ist einzuhalten 

Das folgende Beispiel soll noch einmal die Zählschleife 
mit IF-THEN der Version mit FOR-TO-NEXT gegenüber¬ 
stellen und diesen interessanten Unterschied aufzeigen. 

Mit beiden Methoden wollen wollen wir 20 Zeilen des 
Bildschirms mit dem Buchstaben A füllen 
—► 10 PRINT "(CLR-Taste)" 

20 X=X+1 
30 PRINT "A"; 

40 IF X< > 20*40 TUEN 20 
Zeile 10 löscht den Bildschirm. Zeile 20 ist der Zähler. In 
Zeile 30 dürfen Sie das Semikolon nicht vergessen, damit 


alle Buchstaben nebeneinander geschrieben werden. 

Die Prüfbedingung in Zeile 40 fragt nach, ob 20 Zeilen 
mal 40 Plätze gefüllt sind, eine Schreibweise, die durchaus 
erlaubt ist. 

Schreiben Sie die andere Version direkt darunter: 

—► 110 PRINT "(CLR-Taste)" 

120 FOR X=1 T0 20*40 
130 PRINT "A"; 

140 NEXT X 

Diese Zeilen brauche ich Ihnen nicht erklären. 

Der frappierende Unterschied: 

- die IF-THEN-Schleife benötigt ca. 10 Sekunden 

- die FOR-TO-NEXT-Schleife benötigt nur wenig mehr als 
2 Sekunden 

Auf dieses Phänomen der Laufzeitunterschiede werde 
ich in Lektion 23 noch eingehen. 


LEKTION 9: Eingabe 


So, jetzt möchte ich Sie mit der Möglichkeit vertraut 
machen, während des Ablaufs eines Programms - also 
nicht schon beim Eintippen desselben - dem Computer 
Anweisungen in Form von Zahlen und Wörtern zu geben. 

9.1. Eingabe mit Input 

Bislang haben wir, wie gesagt, alle Zahlen und Wörter, 
die der Computer auf den Bildschirm bringen sollte, immer 
vorher, das heißt, beim Schreiben der Programmzeilen ein¬ 
gegeben, als Wert-Zuweisung für eine Variable (das gute 
alte Stichwort), mit und ohne LET-Befehl. 

Dasselbe während des Ablaufs eines Programms 
ermöglicht der BASIC-Befehl 

INPUT (gefolgt von einer Variablen) 

Auf deutsch würde dieser Befehl »Eingabe« heißen. Im 
Direkt-Modus können wir ihn leider nicht einsetzen. Versu¬ 
chen Sie es ruhig: 

—► INPUT A (RETURN nicht vergessen!) 

Der Computer bestraft uns mit der Fehlermeldung »ILLE¬ 
GAL DIRECT ERROR«. Aber im Programm-Modus, das 
heißt mit einer Zeilennummer versehen, geht es. Auch das 
wollen wir ausprobieren: 

—► 10 INPUT A 

Jetzt nur noch RUN eingeben, und siehe da, der Compu¬ 
ter druckt ein Fragezeichen und wartet mit blinkendem Cur¬ 
sor. 

Daß er wirklich wartet, merken Sie daran, daß er beharr¬ 
lich immer wieder die Fehlermeldung »REDO FROM 
START« - was einfach »NOCH EINMAL« heißt - und danach 
das auffordernde Fragezeichen ausdruckt, wenn Sie einen 
Buchstaben oder ein Zeichen eingeben. 

Er akzeptiert nur Zahlen, und außerdem noch die Leer¬ 
taste, den Punkt, das Plus- und das Minuszeichen. Die 
RETURN-Taste bricht den Befehl ab, und das Programm 
fährt mit der nächsten Zeile fort. 

Warum akzeptiert INPUT A nur Zahlen? Nun, was pas¬ 
siert bei INPUT eigentlich? 

Die Zahl, die wir per Tastatur eingeben, wird der Varia¬ 
blen A, die hinter dem Befehlswort INPUT steht, zugeord¬ 
net, genauso wie mit dem LET-Befehl. 

Mit der folgenden Programmzeile, die Sie zusätzlich zur 
Zeile 10 eingeben, wird diese Zuordnung bewiesen: 

—► 10 INPUT A 
20 PRINT A 

Die beiden Zeilen 10 und 20 zusammen ergeben ein 
Mini-Programm, welches nach RUN auf eine Eingabe war¬ 
tet und diese - sofern es eine Zahl ist - auf dem Bildschirm 
ausdruckt. 

Wir können also in der Tat mit der Tastatur innerhalb 
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eines Programms Zahlenwerte in dasselbe eingeben, aber 
warum nur Zahlen? 

Die Antwort ist einfach: Einer Variablen, die den Namen 
»A«, oder »ZAHL« oder »SUMME« hat, dürfen nur Zahlen 
zugeordnet werden. 

Das heißt aber nicht, daß wir auf schriftliche Anweisun¬ 
gen, die aus Buchstaben, Zeichen oder ganzen Wörtern 
bestehen, verzichten müssen. Der INPUT-Befehl akzep¬ 
tiert sie auch, aber nur, wenn wir String-Variable verwen¬ 
den. 

Wir können nämlich jetzt mit dem Befehl 
INPUT A$ 

die Eingabe einer Information in Form eines Strings pro¬ 
grammieren. 

Bitte löschen Sie das letzte Programm mit NEW und 
geben Sie die beiden früheren INPUT-Programmzeilen 
neu ein und zwar jetzt so: 

—► 20 INPUT A$ 

30 PRINT A$ 

Wenn Sie nun RUN eingeben, wartet der Computer mit 
dem Fragezeichen, bis Sie einen String eingeben und mit 
RETURN abschließen. Dann erst druckt er den String aus. 
Der eingegebene String A$ darf maximal 88 Zeichen ent¬ 
halten. 

In einem benutzerfreundlichen Programm sollte natür¬ 
lich bei dem wartenden Fragezeichen von IN PUT dabeiste¬ 
hen, welche Art von Eingabe erwartet wird. Der Benutzer 
des Programms sieht ja schließlich die Programmzeile 
nicht, in welcher der INPUT-Befehl - mit oder ohne »$« - 
steht. 

Eine derartige Angabe können wir leicht erzeugen, 
indem wir eine entsprechende PRINT-Zeile vor den INPUT- 
Befehl der Zeile 20 setzen: 

—► 10 PRINT "TEXT-EINGABE" G <* 6R c 

20 INPUT A$ 

30 PRINT A$ 

Als Ergebnis erhalten wir auf dem Bildschirm das Wort 
»TEXT-Eingabe«, darunter das Fragezeichen und wie 
gehabt den wartenden Cursor. 

Wem das Untereinander nicht gefällt, der kann mit dem 
Semikolon als String-Kleber alles auf eine Zeile bringen: 
—► 10 PRINT"TEXT-EINGSABE"; 

Aber es geht noch viel eleganter!! 

Der INPUT-Befehl selbst kann die Angabe enthalten. Wir 
nennen das einen »Kommentar« oder auf englisch ein 
»Prompt«. 

—► 10 

20 INPUT"TEXT-EINGABE";A$ 

30 PRINT A$ 

Zuerst wird die Zeile 10 gelöscht. Die Zeile 20 bringt das¬ 
selbe Ergebnis wie vorher die beiden Zeilen 10 und 20 
zusammen. 

Der Kommentar hinter dem INPUT muß immer zwischen 
Anführungszeichen stehen, darf maximal 38 Zeichen - 
auch Leerstellen zählen dazu - lang sein und muß von der 
Variablen (egal ob numerisch oder String) durch ein Semi¬ 
kolon getrennt sein. 

Und noch eine feine Einrichtung hat der INPUT-Befehl: 
Man darf hinter ihn mehrere Variable hängen, die dann 
allerdings alle eingegeben werden müssen. Die Schreib¬ 
weise ist der des PRINT-Befehls sehr ähnlich: 

—► 40 INPUT"4 ZAHLEN";A,B,C,D 
50 PRINT A;B;C;D 
60 INPUT"3 STRINGS";A$,B$,C$ 

70 PRINT A$ B$ C$ 

Sie sehen deutlich, daß der INPUT-Befehl ein Komma 
zur Trennung der Variablen verlangt, der PRINT-Befehl 
dagegen ein Semikolon, was, wie schon erwähnt, bei 
String-Variablen weggelassen werden kann. 


Wenn Sie nun trotz des Kommentars, 4 Zahlen einzuge¬ 
ben, nur eine einzige eingeben und die RETURN-Taste 
drücken, gibt sich der Computer nicht zufrieden, sondern 
deutet mit einem doppelten Fragezeichen unmißverständ¬ 
lich darauf hin, daß noch weitere Eingaben erforderlich 
sind. 

Die Zahlen, hintereinander eingegeben, müssen auch 
durch Kommata getrennt werden. 

Geben Sie aber mehr Werte ein, als durch die Anzahl der 
Variablen hinter dem INPUT-Befehl verlangt werden, 
erscheint die Fehlermeldung »EXTRA IGNORED«. 

Basic-Befehl Nr. 9 INPUT 

- darf nur innerhalb eines Programms (also nur mit Zeilen¬ 
nummer) eingesetzt werden 

- wird immer in der Schreibweise: 

INPUT (Variable) verwendet 

- druckt ein Fragezeichen auf den Bildschirm und wartet 
auf eine Eingabe von der Tastatur, die mit RETURN abge¬ 
schlossen werden muß 

- akzeptiert numerische Variable (Zahlen) und String- 
Variable (Text) 

- weist eine falsche Zuordnung zurück, das heißt eine Zahl 
kann nicht für eine String-Variable und ein String nicht für 
eine normale Variable eingegeben werden 

- mit einem einzigen INPUT-Befehl kann die Eingabe von 
mehreren Variablen abgefragt werden. Diese Variablen 
müssen durch Kommata voneinander getrennt sein 

-werden nicht alle geforderten Variablen eingegeben, 
fragt INPUT mit einem doppelten Fragezeichen nach den 
fehlenden Werten 

- werden mehr Werte als gefordert eingegeben, meldet der 
Computer dies mit einer Fehlermeldung »EXTRA IGNO- 
RED« 

- befC. ing-Eingaben dürfen maximal 88 Zeichen einge¬ 
geben werden 

- INPUT kann mit einem Kommentar versehen werden, 
den es vor dem Fragezeichen ausdruckt. Dieser Kom¬ 
mentar muß so geschrieben werden: 

INPUT " KOMMENTAR ":(Variable) 

- der Kommentar darf maximal 38 Zeichen lang sein 

Diese Eingabemethode für Strings funktioniert gut, aber 
sie hat ein paar Eigenheiten und Einschränkungen: Dazu 
ein paar Beispiele: 

Starten Sie die Zeilen 10 und 20 mit RUN. Wenn Sie hin¬ 
ter dem blinkenden Fragezeichen eingeben: 

WERT:ZAHL oder WERT,ZAHL 
erscheint eine Fehlermeldung und der Ausdruck: 

EXTRA IGNORED 
WERT 

Der Text ab dem Komma beziehungsweise ab dem Dop¬ 
pelpunkt wird unterschlagen. 

Die Eingabe: 

"WERT" IST 

führt zur Fehlermeldung REDO FROM START. 

Bei einer Eingabe: 

"DER WERT 

wird das Anführungszeichen nicht geschrieben. 

Dagegen wird die folgende Eingabe akzeptiert: 

DER "WERT" IST 

Sie sehen, man muß aufpassen. 

1. Komma und Doppelpunkt dürfen im einzugebenden 
Text nicht Vorkommen 

2. einen Zeilensprung mit RETURN einzugeben geht 
nicht, da diese Taste den INPUT-Vorgang beendet 

3. der Text darf nicht mit einem Anführungszeichen an¬ 
fangen 
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4. der Text - mit Leerstellen - darf nicht länger als 88 Zei¬ 
chen sein 

5. der Eingabevorgang kann nicht mit der STOP-Taste 
abgebrochen werden. 


Der INPUT-Befehl in Verbindung mit der IF-THEN- 
Abfrage ist eine wichtige Möglichkeit zur Steuerung und 
Beeinflussung von Programmen durch den Benutzer. Wir 
werden sie immer wieder antreffen. Zwei kleine Beispiele 
sollen diese Befehlskombination verdeutlichen: 

In einem Spielprogramm soll der Spieler eine Zahl zwi¬ 
schen 5 und 10 eingeben. Das geht so: 

—► 10 PRINT"GEBEN SIE EINE ZAHL ZWISCHEN 
5 UND 10 EIN" 

20 INPUT "ZAHL (5-10) ";Z 
30 IF Z < 5 THEN 20 
40 IF Z > 10 THEN 20 
50 PRINT Z 

Jede eingegebene Zahl Z, die kleiner als 5 oder größer 
als 10 ist, wird durch die Zeilen 30 und 40 durch Rück¬ 
sprung auf den INPUT-Befehl zurückgewiesen. 

Die Prüfvariable kann auch ein String sein. Bitte ergän¬ 
zen Sie das Programm mit den folgenden Zeilen: 

—► 60 INPUT "JA ODER NEIN";A$ 

70 IF A$="JA" THEN GOTO 100 
80 IF A$="NEIN" THEN GOTO 110 
90 PRINT "FALSCHE EINCABE":C0T0 60 
100 PRINT "JA" 

110 PRINT "NEIN" 

Das wollen wir jetzt zeilenweise analysieren. 

Zeile 60 ist der INPUT-Befehl, der uns im Kommentar auf¬ 
fordert, entweder »JA« oder »NEIN« einzugeben. 

Zeile 70 prüft, ob wir »JA« eingegeben haben. Ist das der 
Fall, dann springt sie auf Zeile 100, und wir erhalten den 
Ausdruck »JA«. Haben wir nicht das »JA« eingegeben, geht 
das Programm in der nächsten Zeile (80) weiter. 

In Zeile 80 wird geprüft, ob wir »NEIN« eingegeben 
haben. Wenn das zutrifft, springt sie auf Zeile 110, und das 
Wort »NEIN« wird ausgedruckt. Haben wir aber »NEIN« 
auch nicht eingegeben, sondern irgend ein anderes Wort 
(String), dann geht das Programm in der nächsten Zeile 
(90) weiter. 

Ich hoffe, Sie sehen wieder das typische Muster des 
IF.THEN-Befehls. 

In Zeile 90 schließlich wird die Ermahnung ausgedruckt, 
doch nur mit »JA« oder »NEIN« zu antworten, und mit dem 
Rücksprung GOTO 60, mit dem Doppelpunkt als zweitem 
Befehl der Zeile 90 angehängt, wird eine neue Eingabe ver¬ 
langt. 

Einen kleinen Fehler hat das Programm noch. Wenn Sie 
es mit RUN von Anfang an oder mit RUN 60 nur ab der 
INPUT-Zeile starten und gleich mit »JA« antworten, kommt 
zuerst Zeile 100 zum Zuge, aber gleich danach auch Zeile 
110, und wir erhalten beide Ausdrucke, »JA« und »NEIN«. 

Zeile 110 können wir in diesem Fall ausblenden, entwe¬ 
der durch eine Überbrückung mit GOTO (irgendwohin) 
oder mit einem neuen BASIC-Befehl, der das Programm 
mit Zeile 100 beendet. Er heißt END. 


Endstation mit END 


Ändern Sie bitte Zeile 100 ab: 

—► 100 PRINT"JA":END 
Jetzt klappt es. 

Der END-Befehl beendet also die Ausführung eines Pro¬ 
gramms. 


Basic-Befehl Nr. 10 END 

Dieser Befehl steht für sich allein oder nach einem 
IF.THEN-Befehl als Aktionsanweisung. 

Er beendet sofort ein Programm und der Computer mel¬ 
det sich mit READY und blinkendem Cursor. 


9.2. Eingabe mit GET 

In Basic gibt es noch einen zweiten Befehl, der im Prinzip 
das gleiche wie INPUT macht. Nur im Detail der Ausfüh¬ 
rung unterscheidet er sich vom Kollegen INP r UT. Diese 
Unterschiede aber machen ihn zu einer wertvollen Alterna¬ 
tive. 

Der Befehl heißt 

GET (Variable) 

was soviel bedeutet, wie »holen, bekommen«. 

Der GET-Befehl holt also einen Wert und weist ihn der 
hinter ihm stehenden Variablen zu. Diese Variable kann 
eine numerische oder eine String-Variable sein. 
Unterschied zwischen GET und INPUT 

- INPUT wartet, bis eine Eingabe mit der RETURN-Taste 
abgeschlossen ist 

- GET wartet nicht, sondern prüft lediglich, ob eine Taste 
gedrückt worden ist. 

- INPUT erlaubt die Eingabe bis zu 78 Zeichen 

- GET holt immer nur 1 Zeichen 

- INPUT meldet sich mit Fragezeichen und Cursor 

- GET meldet sich auf dem Bildschirm nicht 

Die Frage stellt sich, wie der GET-Befehl prüfen kann, ob 
eine Taste gedrückt worden ist, wenn er nicht wartet. Daß 
er gerade in dem kurzen Zeitpunkt prüft, in dem zufällig der 
Tastendruck stattfindet, ist mehr als unwahrscheinlich. 

Und in der Tat, wenn nicht das Zeichen jeder gedrückten 
Taste in einen Pufferspeicher käme, ehe es weiter verwen¬ 
det wird, hätte der GET-Befehl keine Chance, jemals eine 
Eingabe zu erwischen. 

Der Tastaturpuffer 


Diesen Speicher des Computers, in dem die Zeichen 
gedrückter Tasten erst einmal zwischengelagert werden, 
möchte ich Ihnen kurz zeigen. 

Dazu brauchen wir eine Zählschleife, wie wir sie beim 
GOTO-Befehl erstmals angewendet haben. Hier brauche 
ich sie, um eine sogenannte Zeitverzögerungsschleife zu 
bauen. Diese tut das, was ihr Name sagt: sie zählt eine 
gewisse Zeit still vor sich hin und verzögert so den nächsten 
Programmschritt. Entfernen Sie bitte alle Programmzeilen 
mit NEW 
—► NEW 

30 X=X+1 

40 IF X < > 500 THEN 30 

Mit RUN gestartet, läuft die Schleife in diesen beiden Zei¬ 
len 500mal durch, bis sich der Editor mit READY und Cur¬ 
sor wieder meldet. 

Diese Zeit nützen wir, um so viele Tasten wie möglich hin¬ 
tereinander zu drücken. Natürlich sehen wir nichts auf dem 
Bildschirm, während das Programm der Zeitschleife läuft. 
Die Behauptung, daß die gedrückten Zeichen in einen Puf¬ 
ferspeicher kommen, bewahrheitet sich nach dem Ende 
der Zeitschleife. 

Nach dem READY holt nämlich der Editor alle Zeichen 
aus dem Tastaturpuffer und druckt sie aus. Da dieser Puffer 
nur 10 Zeichen speichern kann, sehen Sie nur 10 Zeichen, 
selbst wenn Sie es geschafft haben, mehr einzugeben. 
Also nochmal: 

—► RUN eingeben 

möglichst viele Tasten drücken, aber nicht gleich¬ 
zeitig nach dem READY die Zeichen zählen 
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ln diesem Tastaturpuffer schaut also der GET-Befehl 
nach, ob vorher ein Tastendruck ein Zeichen darin unterge¬ 
bracht hat. Wenn ja, dann verwendet er es, falls nein, 
kommt die nächste Programmzeile dran. 

Um das zu zeigen, erweitern wir das obige Programm um 
vier weitere Zeilen: 

—► 10 GET A 
20 PRINT A 
30 X=X+1 

40 IF X < > 100 THEN 30 
50 X=0 
60 GOTO 10 

In Zeile 10 schaut der GET-Befehl im Tastaturpuffer nach 
einem Zeichen. Was immer er findet, druckt Zeile 20 auf 
den Bildschirm. Eine 0 signalisiert, daß der Puffer leer war. 

Die Zeilen 30 und 40 zählen von 1 bis 100, wie beim Ver¬ 
steckspielen, und machen dann nach 100 Zähleinheiten in 
Zeile 50 weiter, in der die Zählvariable X wieder auf Null 
gesetzt wird. 

Zeile 60 springt zurück auf den GET-Befehl und alles 
fängt mit X=0 wieder von vorn an. Das Resultat ist eine 
langsam fortschreitende senkrechte Kolonne von Ziffern 
links am Bildschirm. Die Geschwindigkeit ist durch die 
Prüfzahl in Zeile 40 einstellbar. 

Während der Zählschleife haben wir nun Gelegenheit, 
Zahlen einzugeben, die als einzelne Ziffern vom GET- 
Befehl geholt und durch Zeile 20 ausgedruckt werden. 

Die Zeitschleife der beiden Zeilen 30 und 40 können wir 
natürlich auch mit der FOR-TO-NEXT-Schleife schreiben. 
Da diese Schleifenart aber viel schneller abläuft, muß die 
Zählvariable lOmal so groß sein. 

—► 30 FOR X=0 TO 1000: NEXT 
40 (entfällt) 

50 (entfällt) 

Wenn Sie einen Buchstaben eingeben, bricht das Pro¬ 
gramm mit einer Fehlermeldung ab. 

Um Buchstaben und Zeichen eingeben zu können, müs¬ 
sen wir die numerische Variable A in eine String-Variable 
A$ umwandeln - natürlich in beiden Zeilen 10 und 20. 

Jetzt holt der GET-Befehl Buchstaben - aber auch Zif¬ 
fern! Diese werden jedoch als Zeichen (einstellige Strings) 
und nicht als Zahlenwerte behandelt. 


Basic-Befehl Nr. 11 GET 

- der Befehl GET (Variable) holt eine Zahl oder ein Zeichen 
aus dem Tastaturpuffer und weist es der Variablen zu 

- die Variable kann eine numerische oder eine String- 
Variable sein 

- entspricht das Zeichen bzw. die Zahl nicht dem Variablen¬ 
typ, wird mit Fehlermeldung abgebrochen 

- GET wartet nicht. Falls der Puffer leer ist, weist er der 
Variablen den Wert 0 beziehungsweise einen sogenann¬ 
ten »Nullstring« (kein Leerzeichen, einfach gar nichts) zu 

- im Gegensatz zu INPUT sind bei der Eingabe mit GET 
alle Zeichen erlaubt, auch Komma, Doppelpunkt und 
Semikolon 


Jetzt will ich Ihnen eine echte Anwendung des GET- 
Befehls zeigen. Wir haben in Lektion 9 bei der INPUT- 
Eingabe einen Programmteil geschrieben, um den Benut¬ 
zer zu fragen, ob er mit JA oder NEIN antworten will. 

Mit dem INPUT-Befehl ging das so: 

—*• 10 PRINT "BEGINN" 

. (Programm) 

320 INPUT"NOCH EINMAL (J/N)";A$ 

340 IF A$= "J" THEN 10 


350 IF A$ < > " N" THEN 320 
360 PRINT"AUF WIEDERSEHEN" 

Ab Zeile 10 beginnt das Programm. 

Zeile 320 fragt nach J(a) oder N(ein). 

Zeile 340 prüft, ob die Eingabe "J(a)" ist, im Fall »wahr« 
springt das Programm an den Anfang zurück. 

Im Fall »falsch« kommt Zeile 350 an die Reihe mit der Prü¬ 
fung, ob die Eingabe ein ungültiges Zeichen ist - alle Zei¬ 
chen außer »NEIN« sind ungültig. Leider ist die Eingabe 
»NEIN« auch falsch, denn wir prüfen ja nur auf »N«. Das ist 
ein Nachteil des INPUT-Befehls. 

Im Fall »wahr« beziehungsweise »J« wird der INPUT- 
Befehl wiederholt. Wenn es ein »N« war, verabschiedet sich 
das Programm in Zeile 360. 

Dasselbe machen wir jetzt mit dem GET-Befehl. Die Zei¬ 
len 10, 340, 350 und 360 bleiben unverändert. 

—► 10 PRINT"BEGINN" 

. (Programm) 

320 PRINT"NOCH EINMAL (J/N)?" 

330 GET A$:IF A$=""THEN 330 
340 IF A$="J"THEN 10 
350 IF A$ < > "N" THEN 320 
360 PRINT"AUF WIEDERSEHEN" 

Zeile 320 druckt die Anfrage aus, die oben hinter dem 
INPUT-Befehl steht. In Zeile 330 schaut der GET-Befehl im 
Tastaturpuffer nach, ob er ein Zeichen enthält. Mit IF 
A$= " " prüft er, ob der Puffer leer ist. Die doppelten Anfüh¬ 
rungszeichen ohne Zwischenraum repräsentieren den bei 
der Befehlsbeschreibung genannten »Nullstring«, das 
heißt, im Puffer war kein Zeichen. Deswegen springt diese 
Zeile 330 auf sich selbst zurück und verharrt in dieser 
Schleife so lange, bis die Prüfbedingung des Nullstrings 
nicht mLhr erfüllt ist. Das ist sie, sobald irgendeine Taste 
gedrückt worden ist. Die restlichen Zeilen prüfen genauso 
wie im Beispiel vorher. Der Hauptunterschied ist der, daß 
der GET-Befehl auch »NEIN« akzeptiert, prüft er doch 
immer nur 1 Zeichen, nämlich das erste - er würde natürlich 
auch »NAME« akzeptieren. Außerdem reagiert er sofort 
und nicht erst nach dem Drücken der RETURN-Taste. Prin¬ 
zipiell möchte ich sagen, daß der GET-Befehl »intelligen¬ 
ter« ist als INPUT. Er bietet mehr Flexibilität und auch mehr 
Eleganz - eine Eigenschaft, in der sich oft gute und 
schlechte Programme unterscheiden. 


FAZIT 

1. der GET-Befehl wartet nicht 

2. wenn er auf eine Eingabe warten soll, muß er mit einer 
»Nullstring-Abfrage« in eine einzeilige Warteschleife gelegt 
werden: 

20 GET A$: IF A$="" THEN 20 


Es könnte sein, daß der eine oder andere Leser jetzt 
seufzt und sich fragt, wie denn mit allen diesen Befehlen 
jemals ein Programm zusammenstellbar sei. 

Ich habe in der Tat vor, so schnell wie möglich mit Ihnen 
ein erstes sinnvolles und für Sie reizvolles Programm zu 
entwickeln. Natürlich wird es ein Spiel sein. Wir brauchen 
dazu aber noch zwei weitere Befehle. 

LEKTION 10: 

Zufallszahlen und ganze Zahlen 


Der Zufall im Computer ist eigentlich ein Widerspruch in 
sich, da doch im Computer alles durch die Anweisungen 
des Programms fest vorgegeben ist. Und doch gibt es 
etwas Zufallähnliches. 
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Es ist sowohl bei mathematischen Anwendungen als 
auch bei Spielen oft erforderlich, von einer nicht vorher 
bekannten, völlig zufällig entstandenen Zahl auszugehen. 
Wie könnte sie anders heißen als »Zufallszahl«. 

BASIC hat einen Befehl, der eine derartige Zufallszahl 
erzeugt. Er heißt: 

RND (X) 

Der Name ist abgeleitet aus Random, was auf deutsch 
»zufällig« bedeutet. 

Das X, das in Klammern hinter dem Befehlswort steht, 
wird Argument genannt. Das X kann drei Werte haben: 

- eine positive Zahl (egal, welcher Wert) 

- eine negative Zahl 


Auch dafür hat BASIC einen Befehl. Er lautet: 

INT 

Das ist die Abkürzung von Integer, was auf deutsch 
»ganze Zahl« bedeutet. 

Der Dezimalbruch, der mit INT in eine ganze Zahl ver¬ 
wandelt werden soll, wird in Klammern hinter den Befehl 
geschrieben. Der Befehl ist im Direktmodus verwendbar: 
—► PRINT INT(25.38) 

Wir erhalten die Zahl 25. 

INT macht es sich also leicht - es schneidet einfach alle 
Zahlen hinter dem Dezimalpunkt weg. 

Es ist auch erlaubt, genau wie beim PRINT-Befehl eine 
Formel mit INT zu versehen: 


- die Zahl 0 

Bevor wir darauf eingehen, möchte ich Ihnen die Wir¬ 
kungsweise von RND zeigen, wie immer am besten durch 
ein Experiment. 

—► 10 A=RND(1) 

20 PRINT A 
30 GOTO 10 

Diese drei Zeilen bilden eine Schleife, die Ihnen in einem 
Zahlenstreifen die Werte zeigt, die RND(1) erzeugt. Wir 
sehen vielstellige Zahlenwerte, die abgerundet zwischen 0 
und 1 liegen. 

Ab und zu taucht in der Zahlenkolonne eine Zahl in eigen¬ 
artiger Schreibweise auf, mit einer Ziffer vor dem Dezimal¬ 
punkt und einem »E-« gefolgt von einer Zahl. Das ist die 
sogenannte wissenschaftliche Schreibweise, dio im Hand¬ 
buch von Commodore genauer erklärt wird. Hier bitte ich 
Sie, diese Zahlen ganz einfach zu ignorieren. 

Zurück zu den Zahlen, die von RND erzeugt werden. 

Sie werden von einer Anfangszahl ausgehend durch 
eine komplizierte mathematische Formel errechnet, die 
zwar keine absolute Zufälligkeit garantiert, ihr aber sehr 
nahekommt. 

Sie können sich vorstellen, daß die Zufälligkeit ganz 
wesentlich von der oben genannten Anfangszahl abhängt. 
Und gerade sie wird durch das Argument (X) beziehungs¬ 
weise durch die drei Arten des Arguments bestimmt. 

Das positive X beginnt nach dem Einschalten des Com¬ 
puters immer mit derselben Anfangszahl. Bei X=0 wird als 
Anfangszahl der Stand der inneren Computeruhr genom¬ 
men. Bei einer negativen Zahl bildet diese selbst den 
Anfangswert. 

Falls Sie mehr über diese Methode wissen wollen, finden 
Sie eine Erklärung im der 64’er Ausgabe 8/85 auf Seite 131. 

Ich empfehle Ihnen, den Wert 0 zu nehmen. Mit 0 als 
Argument von RND will ich die drei Zeilen von oben neu 
schreiben, diesmal als sogenannten »Einzeiler«. Darunter 
versteht man ein Programm, welches in eine einzige Zeile 
paßt. Glauben Sie mir, in dieser Art sind schon ganze Kunst¬ 
werke veröffentlicht worden. 

Diesen Anspruch erhebe ich nicht, nur den der Verein¬ 
fachung. 

—► 10 PRINT RND(0):GOT0 10 

Die Zeile braucht unbedingt eine Zeilennummer, damit 
der GOTO-Befehl eine Schleife bilden kann. 


—*• PRINT INT(2.8908*567.8) 

Das Ergebnis ist 1641. 

Basic-Befehl Nr. 13 INT(A) 

- wandelt einen Dezimalbruch A in eine ganze Zahl um 

- A kann nicht nur ein Dezimalbruch, sondern eine mathe¬ 
matische Formel oder ein komplizierter mathematischer 
Ausdruck sein 

- die Klammern dürfen nicht weggelassen werden 

Diesen Befehl INT wenden wir jetzt an, um aus den uner¬ 
wünschten Dezimalbrüchen des RND-Befehls ganze Zah¬ 
len zu machen. 

Zuerst nehme ich der Klarheit halber die 3zeilige Version, 
welche die Zufallszahl einer Variablen zuordnet: 

—► 10 A=RND(0) 

20 PRINT INT(A) 

30 GOTO 10 

Der Unterschied zu vorher liegt hier in der Zeile 20. Das 
Resultat nach RUN ist enttäuschend, aber verständlich, 
denn der INT-Befehl macht aus Dezimalbrüchen, die klei¬ 
ner ) sind, nur eine 0. 

Zeile 20 muß verbessert werden, indem der Dezimal¬ 
punkt von A nach rechts verschoben wird. Das erreichen 
wir durch die Multiplikation mit 10,100,1000 und so weiter. 

—► 20 PRINT INT (A*10) 

liefert Zufallszahlen von 0 bis 9. Den Bereich 0 bis 99 erhal¬ 
ten wir durch: 

—► 20 PRINT INT (A*100) 

Als Einzeiler sieht diese letzte Version so aus: 

—► 10 PRINT INT(RND(0)*100):GOTO 10 
Beachten Sie bitte die Verschachtelung der Klammern: 

INT(RND(0)) 

1. Klammer auf T\ Klammer zu 

2. Klammer auf 2. Klammer zu 

Wenn eine Klammer fehlt oder falsch ist, erhalten wir die 
Fehlermeldung »SYNTAX ERROR«. Am besten ist es, Sie 
überprüfen, daß die Anzahl der geöffneten und geschlos¬ 
senen Klammern immer gleich ist. 

Im Fazit sehen Sie ein Kochrezept, mit dem Sie Zufalls¬ 
zahlen innerhalb des von Ihnen gewünschten Bereiches 
erzeugen können. 


Basic-Befehl Nr. 12 RND(X) 

- wird für X die Zahl 0 oder irgendeine positive Zahl genom¬ 
men, erzeugt dieser Befehl eine zirka achtstellige Zahl 
zwischen Null und Eins. Ihr jeweiliger Wert ist sozusagen 
^zufällig. _ 

Zufallszahlen haben wir jetzt, aber leider in der Form 
eines Dezimalbruches. Wenn wir in einem Programm zum 
Beispiel würfeln wollen, brauchen wir Zufallszahlen von 1 
bis 6. Dezimalbrüche helfen uns da nicht viel. Wir brauchen 
also eine Möglichkeit, diese Dezimalbrüche in ganze Zah¬ 
len umzuwandeln. 


FAZIT 

Die Formel: 

—► A = INT(RND(0)*X)+Y 

erzeugt ganze Zahlen innerhalb des Zahlenbereiches Y bis 
Y+X-1. 

Beispiel: 

Zufallszahlen von 20 bis 90 machen Y zu 20 und erfor¬ 
dern ein X, das aus der Formel Y+X-1=90 errechnet wird. 
Anders geschrieben lautet diese Formel X=90-Y+1. Das 
ergibt in unserem Fall X=71. 


68 
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—► 10 PRINT INT(RND(0)*71)+20 

Im Zweifelsfall lohnt es sich immer, die Formel mit einer 
derartigen Zeile 10 auszuprobieren. 

LEKTION 11: Ein vollständiges Programm 


Wir sind gerüstet für ein erstes Programm. Es heißt »ZAH¬ 
LEN RATEN« und ist aus dem Buch »Computerspiele und 
Knobeleien« von Rüdiger Baumann abgeleitet. 

Aufgabe: 

Eine vom Computer zufällig gewählte Zahl zwischen 
1 und 100 soll in möglichst wenigen Versuchen erraten wer¬ 
den. Nach jedem Rateversuch gibt der Computer einen 
Hinweis »zu groß« oder »zu klein«. Wurde richtig geraten, 
nennt der Computer die Zahl der Versuche und stellt 
anheim, das Spiel noch einmal zu versuchen oder zu be¬ 
enden. 

11.1. Die Planung eines Programms 

Ich habe ganz am Anfang dieses Kurses erwähnt, daß 
Basic dazu verleitet zu »hacken«. In der Tat führt die an sich 
sehr positive Eigenschaft dieser Programmiersprache, 
nämlich schon kleinste Bruchstücke eines Programms ein¬ 
geben und dann gleich ausprobieren zu können, leicht zu 
einem sogenannten »Spaghetti-Programm«. Die einzelnen 
Bruchstücke kann man nämlich stehenlassen und die 
anderen Teile irgendwie dazwischenschieben oder mit 
GOTO irgendwo anhängen. Das Resultat ist aber am 
Schluß ein wilder Haufen von Befehlszeilen, die zwar funk¬ 
tionieren, aber nicht mehr nachvollziehbar sind. 

Es ist daher anzuraten, sich den Ablauf eines Pro¬ 
gramms vorher zu überlegen, was ja nicht schwer ist, weil, 
ein Computer nie mehrere Sachen gleichzeitig macht, son¬ 
dern alle streng hintereinander abwickelt. So einen Ablauf 
kann man schön aufs Papier malen, und das will ich Ihnen 
jetzt zeigen. 

Zuerst schreiben wir ganz einfach alle Vorgänge der 
Reihe nach auf. Wenn die Reihenfolge uns nicht paßt, wird 
sie einfach abgeändert. 

Am Ende kann es so aussehen: 

1. Bildschirm löschen 

2. Überschrift schreiben 

3. Zufallszahl zwischen 1 und 100 erzeugen 

4. Zähler für Zahl der Versuche auf Null stellen 

5. Anweisungen an den Spieler 

6. Eingabe einer geratenen Zahl 

7. Zähler der Versuche um 1 erhöhen 

8. Prüfung der geratenen Zahl auf: 

- zu groß: Hinweis geben und neuer Versuch 

- zu klein: Hinweis geben und neuer Versuch 

- richtig: Zahl der Versuche ausdrucken 

9. Frage ob noch einmal 

- ja: zurück zum Anfang 

- nein: Verabschiedung, Ende 

Alles waä jetzt noch zu tun bleibt, ist, die einzelnen 
Punkte der Reihe nach mit den Befehlen, die wir kennen, 
als Programmzeilen zu schreiben. 

Übrigens: Ich schreibe zuerst nur die »aktiven« Pro¬ 
grammzeilen. Alle anderen Teile des Programms, die nur 
der Lesbarkeit dienen, folgen später. Dadurch erklären sich 
auch die Sprünge in den Zeilennummern, die ich Sie bitte 
zu beachten. 

11.2. Die Durchführung 
Punkt 1 und 2: 

Den Bildschirm löschen wir mit einem PRINT-Befehl, 
hinter dem wir nach dem ersten Anführungszeichen die 
geSHIFTete CLR/HOME-Taste drücken - was bekanntlich 


im Direktmodus den Löschvorgang auslöst. Im Listing 
erscheint dann ein invertiertes Herz. Was es damit auf sich 
hat, erkläre ich im Anschluß an das Programm. 

—► 10 PRINT" [SHIFT CLR/H0ME]" 

. 20 PRINT"#***#* ZAHLEN RATEN ****** 

Punkt 3: 

Der Bereich der Zufallszahl soll zwischen 1 und 100 lie¬ 
gen. Entsprechend dem dafür angegebenen Kochrezept 
INT(RND(0)*X)+Y errechnen wir wieder mit der unteren 
Grenze 1=Y und der oberen Grenze X+Y-1=100 das uns 
noch fehlende X: 

X+1-1=100 

X=100 

Dann ergibt sich für die Zufallszahl »Z« die folgende Pro¬ 
gram mzeile: 

—► 70 Z=INT(RND(0)*100)+1 

Punkt 4: 

Der Zähl-Variablen für die Anzahl der Versuche geben 
wir den Namen »V«. In Zeile 80 wird sie auf Null gesetzt. 
—► 80 V=0 

Punkt 5: 

Die Anweisungen an den Spieler stehen in Zeile 120 und 
130. Sie können sie in Listing 1 - so nennen wir den kom¬ 
pletten Ausdruck eines Programms - in allen Einzelheiten 
nachlesen. 

Sie können die Anweisung aber Ihrem Geschmack ent¬ 
sprechend auch anders schreiben oder anders anordnen. 

Punkt 6: 

Die Aufforderung zur Eingabe einer Zahl und die Ein¬ 
gabe selbst besorgt uns wieder der INPUT-Befehl 

—*• 140 PRINT 

150 INPUT"WELCHE ZAHL IST ES";R 

Vor dem INPUT-Befehl drucken wir erst eine Leerzeile 
aus, d=»mit es besser aussieht. 

Der einzugebenden Zahl stellen wir die numerische 
Variable »R« zur Verfügung, diesmal ohne $-Zeichen, da 
wir ja Zahlen eingeben wollen. 

Punkt 7: 

Sobald die Zahl eingegeben ist, muß die Variable V des 
Versuche-Zählers um 1 erhöht werden. 

—► 160 V=V+1 

Punkt 8: 

Jetzt kommt die Prüfung mit IF THEN. Ich habe sie 
wegen der nachfolgenden Hinweise ZU GROSS, ZU 
KLEIN und RICHTIG in 3 Gruppen zu je 2 Stufen aufge¬ 
baut. 

Das Grundprinzip dieser Prüfung liegt im Vergleich der 
beiden Zahlen, nämlich der geheimen Zahl des Rechners 
»Z« und der eingegebenen Zahl »R« des Raters. Zeile 200 
prüft auf »größer«, Zeile 210 auf »kleiner«, Zeile 220 auf 
»gleich«. 

—► 200 IF R < Z THEN PRINT R;:G0T0 xxx 
xxx PRINT"IST ZU GROSS":GOTO 140 

Die Zeilennummer xxx tragen wir dann nach, sobald klar 
ist, wieviele Zeilen noch dazwischenliegen. 

Wichtig in Zeile 200 ist das Semikolon nach der gerate¬ 
nen Zahl R. Es klebt wiedereinmal den nachfolgenden Satz 
der Zeile xxx direkt hinter den Wert der Zahl R, so daß auf 
dem Bildschirm der Satz erscheint: 

»(Zahl R) IST ZU GROSS«. 

Genauso ist es mit den beiden anderen Prüfungen: 

—► 210 IF R > Z THEN PRINT R;:G0T0 yyy 
yyy PRINT"IST ZU KLEIN":GOTO 140 
220 IF R = Z THEN PRINT R;:G0T0 zzz 
zzz PRINT"IST RICHTIG" 

Aus der Reihenfolge wird jetzt klar, daß xxx die Zeile 230 
ist, entsprechend yyy=240 und zzz=250. Bitte tragen Sie 
dies nach. 

Die beiden falschen Ergebnisse in Zeile 230 und 240 füh- 
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ren also zum Rücksprung auf eine neue Eingabe, die ab 
Zeile 140 beginnt. 

Ein richtiges Ergebnis führt in die nächsthöhere Zeile 
260 weiter. 

In Zeile 260 und 270 drucken wir jetzt den letzten Stand 
des Versuche-Zählers V aus, eingebettet in Text, von dem 
er durch zwei Semikolons getrennt werden muß: 

—► 260 PRINT "SIE HABEN"; V; "VERSUCHE "; 

270 PRINT"BENOETIGT" 

Ich habe mit Absicht den Text, der ja leicht in eine Zeile 
gepaßt hätte, in zwei Zeilen getrennt. Erstens verbessert er 
das Format des Listings. Zweitens aber wollte ich Ihnen zei¬ 
gen, wie man trotzdem den Text in eine Zeile ausgedruckt 
erhält. Das Geheimnis liegt wieder im Semikolon nach dem 
letzten Wort der Zeile 260; zusätzlich aber ist die Leerstelle 
vor dem abschließenden Anführungszeichen wichtig. 
Ohne sie würden die beiden Wörter »VERSUCHE« und 
»BENOETIGT« zu einem einzigen Wort verklebt werden. 
Punkt 9: 

Es bleibt noch die Frage nach einer Wiederholung. Das 
machen wir mit dem GET-Befehl. 

Zeile 320 stellt die Frage, in Zeile 330 wartet der GET- 
Befehl mit einer Nullstring-Schleife auf eine gedrückte 
Taste. Zeile 340 prüft auf »J(a)« und springt zurück auf den 
Anfang, Zeile 350 prüft auf ungültige Eingaben mit Wieder¬ 
holung der Aufforderung, und wenn »N(ein)« eingegeben 
ist, schließt Zeile 360 das Programm mit höflicher Verab¬ 
schiedung. 

—► 320 PRINT"NOCH EINMAL (J/N) ?" 

330 GET A$:IF A$="" THEN 330 

340 IF A$="J"THEN 10 

350 IF A$ <> "N" THEN 320 

360 PRINT:PRINT:PRINT"AUF WIEDERSEHEN" 

370 END ( 

So, das war doch nicht schwer, oder? 

Alles, was passieren kann, sind Tippfehler beim Eingeben. 

Im nachfolgenden Listing 1 ist das ganze Programm 
abgedruckt. 

Zwei Dinge fallen dabei auf: 

- Am rechten Rand stehen Zahlen in eckigen Klammern. 
Es sind Prüfzahlen, die dann entstehen, wenn das Pro¬ 
gramm mit der Eingabehilfe »Checksummer 64 V3« ein¬ 
gegeben wird, welches Sie in jeder Ausgabe der 64’er fin¬ 
den. 

- Viele Zeilen sind bisher in der Beschreibung des Pro¬ 
gramms nicht vorgekommen, zum Beispiel die Zeilen 40, 
50, 60, 90, 100 etc. 

Sie dienen der besseren Lesbarkeit des Listings. Sie sind 
eine eigene kurze Lektion wert. 


LEKTION 12: 

Lesbarkeit und Struktur eines Programms 


Eine Methode, das Listing lesbar anzulegen, besteht darin, 
Leerzeichen an entsprechenden Stellen einzugeben. 
Basic macht nämlich keinen Unterschied zwischen: 

PRINT A$ ; 1 B$ und PRINTA$;B$. 

Die erste Version braucht zwar 3 Speicherplätze mehr - 
eben die 3 Leerzeichen, aber Version 2 ist schlecht lesbar. 

Zur besseren Lesbarkeit gehört auch, daß ab und zu eine 
Leerzeile eingefügt wird, die den Programmablauf nicht 
beeinflußt. Im Programm sind dies die Zeilen 30, 270 und 
290. Man erreicht dies durch einen Doppelpunkt nach der 
Zeilennummer, ohne Befehl. 

Eine dritte Art, das Listing zu verbessern, ist der Befehl 
REM 

Er kommt von Remark und bedeutet »Bemerkung«. Mit 


diesem Befehl kann man Text in das Listing eingeben, der 
aber vom Programm völlig ignoriert wird. Im Beispiel sind 
dies die Zeilen 40 und 380. 


Basic-Befeh! Nr. 14 REM 

Dieser Befehl erlaubt, einen Text oder Zeichen - mit Zeilen¬ 
nummer versehen - in den Ausdruck eines Programms 
(Listing) einzufügen, ohne daß er im Ablauf des Programms 
erscheint. Es werden dabei keine Anführungszeichen ver¬ 
wendet. 

Dieses Verfahren erhöht die Lesbarkeit des Listings. 

Der vierte Punkt, der Ihnen im nebenstehenden Listing 
des Programms Nr. 1 auffallen müßte, ist die Tatsache, daß 
bei allen PRINT-Befehlen der Text auf der linken Seite zwar 
mit einem Anführungszeichen anfängt, aber rechts nicht 
mit dem zweiten Anführungszeichen aufhört. 

Das ist am Ende einer Zeile erlaubt, weil ja die Zeile mit 
der RETURN-Taste abgeschlossen worden ist. 


FAZIT 

1. Leerzeilen, die nur im Listing auftreten, das Programm 
aber nicht beeinflussen, erzeugt man durch einen Dop¬ 
pelpunkt hinter der Zeilennummer 

2. Bei der Abarbeitung einer Programmzeile ignoriert 
Basic alle Leerzeichen, solange sie nicht zwischen 
Anführungszeichen stehend zu einem String gehören. 
Sie können daher weggelassen werden. 

3. Am Ende einer Zeile kann das abschließende Anfüh- 
rungszeichen weggelassen werden. 

Der fünfte Punkt betrifft die einzelnen Blöcke des Pro¬ 
gramms. In Listing 1 - und natürlich schon bei der Planung 
des Frcnramms - habe ich einzelne Gruppen gebildet, die 
dem Programm eine logische und übersichtliche Struktur 
geben. 

Diese Methode nennt man »Strukturiertes Programmie¬ 
ren«, was besonders durch die sogenannten »Unterpro¬ 
gramme« ermöglicht wird. Diese Unterprogramme kom¬ 
men erst in Lektion 24 an die Reihe. 

LEKTION 13: Programmierte Steuerlasten 
und der ASCII-Code 


ln Zeile 10 des Programms »Zahlen Raten« kommt ein 
invertiertes Zeichen in Anführungszeichen vor. Es ist das 
Symbol der Steuertaste CLR, eingebettet in ein Programm. 
Was bedeutet das? 

Der Computer nützt hier eine Eigenschaft des PRINT- 
Befehls aus. PRINT druckt bekanntlich sowohl im Direkt¬ 
ais auch im Programm-Modus alle Zeichen auf den Bild¬ 
schirm, die in Anführungszeichen hinter ihm stehen. 

—► PRINT"AAABBB" 

druckt nach RETURN diese 6 Buchstaben aus. Was ist 
aber mit den Steuertasten CLR, HOME INST, DEL CRSR 
rauf/runter/links/rechts, und was ist mit den Farbtasten? 

Versuchen Sie es! Sie werden sehen, daß auch diese 
Tasten, zwischen Anführungszeichen, ein Symbol auf dem 
Bildschirm erzeugen, und zwar immer invertiert. In einem 
PRINT-Befehl erscheinen diese invertierten Zeichen nur im 
Listing. 

Bei der Ausführung des PRINT-Befehls wird ihre Funk¬ 
tion ausgeführt!! 

Das müssen Sie ausprobieren. Geben Sie einen PRINT- 
Befehl mit Buchstaben, gefolgt von der CTRL-Taste, gleich¬ 
zeitig gedrückt mit der 8-Taste (YEL) und dann wieder 
Buchstaben ein. 
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10 PRINT"CCLR> <186> 
20 PRINT"******** ZAHLEN RATEN ******* <180> 
30 PRINT <132> 
40 : <016> 
50 REM+++++++ VORBEREITUNG ++++++++++++ <244> 
60 : ' <036> 
70 Z=INT(RND(0)*100)+1 <060> 
80 V=0 <065> 
90 : <066> 
100 REM+++++++ RATEN +++++++++++++++++ <082> 
110 = <086> 
120 PRINT"ICH HABE MIR EINE ZAHL <144> 
130 PRINT"ZWISCHEN 1 UND 100 GEMERKT. <252> 
140 PRINT <242> 
150 INPUT"WELCHE ZAHL IST ES ":R <020> 
160 V=V+1 <148> 
170 s , <146> 
180 REM+++++++ PRUEFEN +++++++++++++++ <096> 
190 : <166> 
200 IF R>Z THEN PRINT R;:GOTO 230 <052> 
210 IF R<Z THEN PRINT Ri=GOTO 240 <126> 
220 IF R=Z THEN PRINT Ri:GOTO 250 <152> 
230 PRINT”IST ZU GROSS":GOTO 140 <195> 
240 PRINT"IST ZU KLEIN":GOTO 140 <043> 
250 PRINT"IST RICHTIG" <067> 
260 PRINT"SIE HABEN”iV;"VERSUCHE "i <020> 
270 PRINT"BENOETIGT <030> 
280 = <002> 
290 REM+++++ WIEDERHOLUNG ODER ENDE ++++ <153> 
300 : <022> 
310 PRINT:PRINT:PRINT <181> 
320 PRINT-NOCH EINMAL <J/N) ? <040> 
330 GET AS: IF A$=""THEN 330 <205> 
340 IF A$="J"THEN 10 <137> 
350 IF A$<>"N" THEN 320 <191> 
360 PRINT:PRINT:PRINT"AUF WIEDERSEHEN <017> 
370 END <118> 
© 64'er 


Listing 1. Das erste Programm - einfaches Zahlenraten 


S4SR Of 

—► PRINT"AAA [CTRL 8] BBB" 

Statt (CTRL 8) sehen Sie auf dem Bildschirm ein inver¬ 
tiertes MTC. 

Sobald Sie jetzt < RETURN > drücken, werden die B 
und alles folgende in Gelb gedruckt. Wenn Sie die 
ursprüngliche Farbe wiederherstellen wollen, drücken Sie 
entweder auf die CBM-Taste und die 7 gleichzeitig, oder 
aber auf STOP und RESTORE. 

Genauso wie mit den Farb-Tasten geht es mit den Cursor¬ 
tasten. Zur Abwechslung machen wir das im Programm- 
Modus. 

—► 10 PRINT"ZZZ [4raal CRSR-rechts] XXX" 

Nach RUN werden die Z noch normal, die X aber um 4 
Stellen nach rechts versetzt gedruckt. 

Die folgende Tabelle zeigt Ihnen die invertierten Steuer¬ 
zeichen zur leichteren Identifzierung mit der Funktionsbe¬ 
schreibung. 

(Die letzten acht Steuerfunktionen können nicht mit Tasten 
direkt erzeugt werden. Sie müssen separat als reverse Zei¬ 
chen eingetippt werden.) 

Es gibt dabei einige Funktionen, die ihre eigenen inver¬ 
tierten Steuerzeichen, aber keine eigenen Tasten dafür 
haben bzw. die nicht mit den Tasten erzeugt werden kön¬ 
nen. 


Funktion 

Taste(n) 

Zeichen 

ASCII 

schwarz 

cCTRL 1 > 

■ 

144 

weiß 

<CTRL2> 

s 

5 

rot 

<CTRL3> 

s 

28 

lila 

<CTRL4> 

0 

159 

purpur 

cCTRL 5> 

I 

156 

grün 

<CTRL 6> 

n 

30 


Funktion 

Taste(n) 

Zeichen 

ASCII 

blau 

<CTRL7> 

S 

31 

gelb 

CCTRL 8> 

B 

158 

orange 

cCBM1> 

0 

129 

braun 

cCBM 2> 

K 

149 

hellrot 

cCBM 3> 

S 

150 

hellgrau 

cCBM 4> 

0 

151 

mittelgrau 

cCBM5> 

E 

152 

hellgrün 

cCBM 6> 

1 

153 

hellblau 

<CBM 7> 

C 

154 

dunkelgrau 

<CBM 8> 

a 

155 

Revers ein 

CCTRL 9> 

63 

18 

Revers aus 

CCTRL 0> 

B 

146 

Cursor rauf 

cSHIFT CRSR> 

□ 

145 

Cursor ab 

cCRSR> 

0 

17 

Cursor links 

cSHIFT CRSR> 

II 

157 

Cursor rechts 

cCRSR> 

H 

29 

Schirm löschen 

CSHIFT CLR/HOME> 

C 

147 

Cursor Home 

cCLR/HOME> 

0 

19 

Klein-/Groß- 

buchstaben 

cSHIFT CBM> 

n 

14 

Großbuch¬ 

staben/Zeichen 

cSHIFT CBM> 

B 

142 

Funktionstaste 

Fl 

CF1 > 

B 

133 

F2 

CSHIFT Fl > 

a 

137 

F3 

cF3> 

s 

134 

F4 

CSHIFT F3> 

E 

138 

F5 

cF5> 

II 

135 

F6 

CSHIFT F6> 

U 

139 

F7 

cF7> 

II 

136 

F8 

CSHIFT F7> 

B 

140 

Insert 

cSHIFT INST/DEL> 

II 

148 

Delete 

- 

II 

20 

Return 

- 

Bl 

13 

Shift-Return 

- 

9 

141 

Lock 

(Sperre der Zeichen¬ 
satzumschaltung) 


ISI 

8 

Unlock 

(Sperre aufheben) 

_ 

a 

9 

1. Zeichensatz 

- 

Bl 

142 

2. Zeichensatz 

- 

ISI 

14 


Ihre Funktion kann nur dadurch erzielt werden, daß beim 
Eintippen für sie zuerst eine Leerstelle freigelassen wird. 
Nach < RETURN > muß man dann mit dem Cursor auf 
diese Leerstelle fahren, dann REVERS-ON (mit der CTRL- 
Taste) drücken und anschließend das in der Tabelle darge¬ 
stellte (reverse) Zeichen eingeben. Diese Aktion wird wie¬ 
der mit < RETURN > abgeschlossen. 

Ganz rechts in der Tabelle der Steuertasten ist eine 
Spalte von Zahlen, die unter der Überschrift ASCII stehen. 
Was dahintersteckt, sei kurz beschrieben. 

Alle Computer verwenden intern irgendwelche Code- 
Zahlen, um die Zeichen, Buchstaben und Zahlen im 
Rechenwerk, im Speicher und in den anderen Einheiten 
des Computers darzustellen. 

Theoretisch kann das jeder Computerhersteller machen, 
wie er will. Nur, wenn Daten von einem Gerät an ein anderes 
geliefert werden, zum Beispiel vom Computer an einen 
Drucker, müssen die Daten einem international standardi¬ 
sierten Code entsprechen. Dieser Standard heißt »Ameri¬ 
can Standard Code for Information Interchange«, abge¬ 
kürzt ASCII. 



SONDERHEFT 19 


























































GRUNDLAGEN 


C64 


Jedes Zeichen, jede Zahl und jede Funktion hat seinen 
eigenen Code-Wert. Sie sind (fast) alle in einer Tabelle im 
Anhang F des Commodore-Handbuches aufgelistet. In der 
Tabelle sind ganz einfach diese Werte nur für die Steuerta¬ 
sten ausgewählt und dargestellt. 

Wir können aber ganz leicht ein kleines Programm 
schreiben, das uns die Abfrage aller ASCII-Codes gestat¬ 
tet. Dazu muß ich allerdings einen Befehl vorwegnehmen, 
den ich in der nächsten Lektion erkläre. Aber das macht 
nichts - Sie können mir sicher folgen. 

—► 10 INPUT A$ 

20 A=ASC(A$) 

30 PRINT A 
40 GOTO 10 

Der Pfiff liegt natürlich im neuen Befehl ASC(A$) in Zeile 
20. Er wandelt den ersten Buchstaben des per INPUT ein¬ 
gegebenen und mit < RETURN > abgeschlossenen 
Strings in seinen ASCII-Codewert um, den wir in Zeile 30 
ausdrucken. 

Zeile 40 verschafft dem Programm die Wiederholbarkeit, 
die bei INPUT nur durch die STOP- und RESTORE-Taste 
aufgehoben werden kann. Jetzt können Sie nach Herzens¬ 
lust alle Tasten und Tastenkombinationen nach ihrem 
ASCII-Code abfragen und so die unvollständige Liste im 
Commodore-Handbuch vervollständigen. 

LEKTION 14: String-Befehle 


Strings - auf deutsch »Zeichenketten« - haben wir ausführ¬ 
lich in Lektion 3 und Lektion 6 behandelt. Basic kennt meh¬ 
rere Befehle, mit denen Strings verändert, verglichen und 
sonst irgendwie manipuliert werden können. 

14.1. Strings und der ASCII-Code 

Da mit dem PRINT-Befehl ja auch Daten an ein anderes 
Gerät gegeben werden, nämlich an den Bildschirm, ver¬ 
steht er die ASCII-Werte auch. 

Der Tabelle im Handbuch entnehmen wir zum Beispiel 
den ASCII-Wert für das A, er ist 65. Um mit dieser Zahl den 
Buchstaben A auf den Bildschirm zu zaubern, gibt es einen 
weiteren Basic-Befehl: 

CHR$(ASCII-Wert) 

Er ist eine Abkürzung von »Character«, was auf deutsch 
»Zeichen« bedeutet. Das String-Symbol muß immer dahin¬ 
ter stehen. 


In Zeile 10 geben wir der numerischen Variablen X den 
Wert 64, das ist um 1 weniger als die Codezahl des Buch¬ 
staben A. 

In Zeile 20 wird eine Zählschleife begonnen mit der Erhö¬ 
hung von X um 1. 

Zeile 30 druckt das dieser Zahl entsprechende Zeichen 
aus. Im ersten Durchlauf ist es das A. 

Zeile 50 schließt die Zählschleife durch den Rücksprung 
auf Zeile 20. Dadurch werden alle Zeichen vom Codewert 
65 bis 90 - das ist das Alphabet von A bis Z - ausgedruckt. 

Die Prüfzeile 40 wartet, bis das Z den Wert 90 erreicht 
und beendet dann das Programm. Nur mit Buchstaben in 
Anführungszeichen wäre dieses Programm recht lang 
geworden. 

Der Befehl CHR$ wird hauptsächlich bei der Verarbei¬ 
tung von Strings, also bei Erkennen, Vergleichen und Ver¬ 
ändern von Wörtern eingesetzt. Er gehört zu einer ganzen 
Gruppe von Befehlen, die alle mit der String-Verarbeitung 
zu tun haben. Wir werden sie alle noch kennenlernen. 

Der direkte Nachbar zu CHR$ ist der Befehl 
ASC (String) 



Er ist die exakte Umkehrung des CHR$-Befehls. ASC ist 
die Abkürzung von ASCII. 

Erinnern Sie sich, ich habe diesen Befehl schon kurz ver¬ 
wandt, in Lektion 13 bei der Vorführung des ASCII-Codes. 
Der Befehl wandelt das erste Zeichen des in Klammern 


Basic-Befehl Nr. 15 CHR$(X) 

- wandelt die ASCII-Codezah! X in ihr entsprechendes Zei¬ 
chen um 

- die Zuordnung der ASCII-Codes und der Zeichen ist im 
Handbuch als Anhang enthalten 

In Verbindung mit dem PRINT-Befehl sieht der 
CHR$-Befehl so aus: 

—► PRINT CHR$(65) 

Diese Zeile, sowohl im Direkt-Modus als auch in einer 
Programmzeile, bewirkt dasselbe wie PRINT "A". Sie 


stehenden Strings in seinen ASCII-Codewert um. 

—•• PRINT ASC("WORT") 

Diese Zeile druckt den ASCII-Wert von W aus, es ist 87. 


Basic-Befehl Nr. 16 ASC(String) 

wandelt das erste Zeichen des Strings in seinen ASCII- 
Codewert um 


Als Beispiel verwende ich die schon mehrfach geübte 
Frage nach Wiederholung oder Ende eines Programms, 
diesmal aber durch Vergleich der ASCII-Werte. 


druckt den Buchstaben A auf den Bildschirm. —► io PRINT "PROGRAMM-ANFANG" 

Was bringt denn das, werden Sie jetzt fragen. Die gute 
alte Anführungszeichen-Methode ist doch viel praktischer . (Programm) 

und kürzer. Aber die Methode der ASCII-Codewerte kann 


dennoch recht vielseitig sein. 

Mit Zahlen, auch mit Codezahlen, kann man nämlich 
rechnen. Geben Sie bitte folgende Zeilen ein: 

—► 10 X=64 
20 X=X+1 

30 PRINT CHR$(X); 

40 IF X=90 THEN END 
50 GOTO 20 


100 PRINT"NOCH EINMAL (J/N) ?" 

110 GET A$:IF A$="" THEN 110 
120 X=ASC(A$) 

130 IF X=74 THEN 10 
140 IF X < > 78 THEN 100 
150 END 

In Zeile 10 soll das Programm beginnen - welches, inter¬ 
essiert uns hier nicht weiter. 
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Am Ende dieses Programms fordert Zeile 100 zur Ein¬ 
gabe von JA oder NEIN auf. 

Zeile 110 enthält das gewohnte Bild der GET-Schleife, die 
wartet, bis ein Zeichen im Tastaturpuffer erscheint. 

Zeile 120 wandelt das erste Zeichen des eingegebenen 
Wortes in seinen ASCII-Code um. Aus der ASCII- 
Codetabelle wissen wir, daß dem erwarteten J die Zahl 74, 
dem N aber die Zahl 78 entspricht. Alle anderen Werte sol¬ 
len zurückgewiesen werden. 

Ist X=74, dann springt Zeile 130 auf den Anfang des Pro¬ 
gramms zurück. 

Ist X nicht 78, wird durch Zeile 140 die Eingabe wieder¬ 
holt. 

Im Fall, daß X=78, fällt die Prüfung in Zeile 140 durch, und 
das Programm macht in Zeile 150 Schluß. 

Auch dieses Programm ist länger als die alte Methode, 
aber es zeigt wenigstens die Arbeitsweise von ASC. 


14.2. Das Zerteilen von Strings 

Der Befehl ASC hat den Nachteil, daß er immer nur das 
erste Zeichen des Strings zur Umwandlung nimmt. Um ein 
ganzes Wort in seine einzelnen ASCII-Codewerte zu zerle¬ 
gen, brauchen wir eine Methode, welche uns gestattet, ein¬ 
zelne Zeichen des Wortes abzuschneiden bzw. herauszu¬ 
picken. Ich müßte eigentlich String statt Wort sagen, denn 
das alles gilt natürlich auch für Zeichen und Symbole. 

Es wäre schön, wenn man dieses Abschneiden am 
Anfang, in der Mitte oder am Ende dieses Wortes bzw. 
Strings machen könnte. 

Basic kann alle drei: 

- LEFT$ schneidet vom linken Rand des Strings Zeichen 
heraus 

- RIGHTS tut dasselbe auf der rechten Seite B'VGR on 

- MID$ pickt Teile aus der Mitte des Strings heraus 
Natürlich bieten diese Befehle auch die Möglichkeit, 

anzugeben, wieviele Zeichen abgetrennt werden sollen. 

Bei LEFT$ und RIGHTS ist das nur eine einzige Zahlen¬ 
angabe. 

Bei MID$ brauchen wir zwei Zahlen. Die eine gibt an, ab 
wo herausgepickt werden soll, die zweite sagt wieviel. 

Im Beispiel wird das schnell klar: 

—► 10 A$= "MOTORHAUBENVERSCHLUSS" 

20 B$ = LEFT$(A$,5) 

30 PRINT B$ 

40 C$ = RIGHTS(A$,7) 

50 PRINT C$ 

60 D$ = MID$(A$,6,5) 

70 PRINT D$ 

Zeile 10 legt uns die Basis mit der Zuweisung des langen 
Wortes an die String-Variable A$. Jetzt geht’s ans 
Beschneiden. Mit Zeile 20 fangen wir an der linken Seite 
des Wortes an. Hinter dem Befehl LEFTS steht in der Klam¬ 
mer zuerst der String, der zerpflückt werden soll, nämlich 
A$. Die zweite Angabe - nach dem Komma - gibt an, wie¬ 
viele Zeichen abgeschnitten werden sollen, im Beispiel 
sind es 5. Diese 5 ergeben gerade den neuen String 
»MOTOR«, der in Zeile 30 ausgedruckt wird. 

Die Schreibweise und Funktion von RIGHTS ist iden¬ 
tisch, halt nur auf der rechten Seite des Wortes A$ wirkend. 

In Zeile 40 erhält dieser Teilstring den Variablennamen C$. 
Zeile 50 druckt also die rechten 7 Zeichen des Strings A$ 
aus, was das Wort »SCHLUSS« ergibt. 

Interessant wird es in Zeile 60 beim Befehl MID$. Nach 
der Angabe des betroffenen Strings A$ steht zuerst die 
Nummer des Zeichens, ab dem von links gezählt herausge¬ 
schnippelt werden soll, die zweite Zahl daneben gibt an, 
wieviele Zeichen es sein sollen. 

In unserem Beispiel ist das sechste Zeichen von links das 


»H«, ab da 5 Zeichen weiter - inklusive des »H« - ergeben 
das Wort »HAUBE«, das in Zeile 70 ausgedruckt wird. 
Das folgende Bild soll das verdeutlichen: 


MID$(A$,6,5) 


A$= 


MO 

T 

0 

R 

H 

A 

U 

B 

E 

N 

V 

E 

R 

S 

Lol 

H 

L 

U 

S 

s 


LEFT$(A$,5) 


RIGHT$(A$,7) 


Basic-Befehl Nr. 17 LEFT$(X$,A) 

- schneidet vom String X$ von links her A-Zeichen ab und 
bildet daraus einen neuen String 

Nr. 18 RIGHT$(X$,A) 

- macht genau dasselbe wie Nr. 17, aber von rechts her 

Nr. 19 MID$(X$,B,A) 

- schneidet vom String X$ von links her ab dem B-Zeichen 
insgesamt A-Zeichen heraus 

- bei MID$ kann die zweite Zahl »A« weggelassen werden. 
Dann schneidet es ab dem B-Zeichen den Rest des 
Strings ab 


Ich empfehle Ihnen, ein bißchen zu experimentieren, am 
besten mit nur einer Zeile 

—*• 100 PRINT LEFT$( "DRACHEN",2) 

RUN 100 

Erstaunt Sie die Schreibweise ? Das sollte jetzt eigentlich 
nicht mehr passieren. 

Der “inzige Unterschied zu vorher ist, daß wir vorher den 
String zuerst einer String-Variablen zugeordnet haben, 
wodurch er im Speicher aufbewahrt wird. Hier schreiben 
wir den String direkt an die Stelle der Variablen, der Com¬ 
puter merkt ihn sich halt nicht. Aber mit RUN 100 können 
Sie leicht den Befehl immer wieder ausführen, nachdem 
Sie mit dem Cursor auf die Zahl gefahren sind und diese 
verändert haben. 

Genauso geht es mit dem Befehl RIGHTS, weswegen ich 
ihn hier auslasse. 

MID$ ist der kniffligste der drei Befehle. 

—► 200 PRINT MID$("DRACHEN",2,5) 
ergibt »RACHE«. Wenn Sie die zweite Zahl ganz weglas¬ 
sen, erhalten Sie »RACHEN«. 

Die Frage stellt sich, ob wir aus dem Wort »DRACHEN« 
mit diesem Befehl zwei getrennte Teile herausholen und so 
zusammensetzen können, daß zum Beispiel das Wort 
»RAHE« entsteht. 

Das geht!! 


MID$(A$,2,2) 


D 

R 

A 

C 

H 

E 

N 


J 


MID$(A$,5,2) 


Wir müssen bloß zuerst den Teil »RA« und in einem zwei¬ 
ten Schritt den Teil »HE« herauszwicken und dann beide 
Teilstrings zu einem neuen String zusammenfügen. Die fol¬ 
genden Zeilen schaffen das: 

—► 10 A$="DRACHEN" 

20 X$=MID$(A$,2,2) 

30 Y$=MID$(A$,5,2) 
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40 Z$=X$+Y$ 

50 PRINT Z$ 

Ich glaube, das brauche ich nicht zeilenweise zu erläu¬ 
tern. 

Jetzt soll aber noch ein bißchen Mathematik dazukom¬ 
men. Es ist ja nicht zwingend vorgeschrieben, daß die Zah¬ 
len in der Klammer hinter dem String-Befehl konstant sind. 
Schauen Sie sich das folgende Beispiel an: 

—► 10 A$="DRACHEN" 

20 X=X+1 

30 B$=LEFT$(A$,X) 

40 PRINT B$ 

50 IF X=7 THEN END 
60 GOTO 20 „ 

Dieses Programm druckt uns das folgende Muster aus: 
D 

DR 

DRA 

DRAC 

DRACH 

DRACHE 

DRACHEN 

Das Geheimnis liegt in Zeile 30, in der die Zahl der abzu¬ 
schneidenden Zeichen nicht konstant, sondern durch die 
Zählschleife mit X von 1 bis 7 hochgezählt wird. 

Und jetzt kommen wir unserem früheren Wunsch, alle 
Buchstaben eines Wortes in ihren ASCII-Code umzuwan¬ 
deln, schon näher. 

Erinnern Sie sich, diese Umwandlung liefert uns der 
ASC-Befehl, aber immer nur für den ersten Buchstaben 
eines Wortes. 

Was wir brauchen, ist so ein Muster: 

DRACHEN 

RACHEN S46R 

ACHEN 
CHEN 
HEN 
EN 
N 

Mit LEFT$ geht das nicht, denn wir schneiden ja an der 
rechten Seite ab. Außerdem fangen wir mit der vollen Wort¬ 
länge von 7 an und reduzieren sie laufend. 

Also, der RIGHT$-Befehl muß her, kombiniert mit einer 
Zählschleife, die aber rückwärts zählt: 

—► 10 A$="DRACHEN" 

20 X=7 

30 B$=RIGHT$(A$,X) 

40 PRINT B$ 

50 X=X-1 

60 IF X=0 THEN END 
70 GOTO 30 

Die rückwärts zählende Schleife wird durch die Festle¬ 
gung des Anfangswertes in Zeile 20 und durch das lau¬ 
fende Vermindern der Zählvariablen in Zeile 50 gebildet. 

Um noch den ASCII-Codewert der jeweils ersten Buch¬ 
staben zu erhalten, müssen wir nur Zeile 40 erweitern zu: 
—*• 40 PRINT B$ "=" ASC(B$) 

Nach dem bisherigen Ausdruck des Teilstrings B$ folgt 
das Gleichheitszeichen - als String zwischen Anführungs¬ 
zeichen gesetzt - und danach der umgewandelte Wert des 
ersten Buchstabens von B$. 

Ich muß Ihnen gestehen, daß das alles nur zur Übung 
war. Denn am elegantesten geht es mit dem Befehl MID$. 

Wir kehren wieder zur hochzählenden Schleife zurück 
und zwicken von links her der Reihe nach die Buchstaben 
heraus, immer nur einen, mit dem Befehl MID$(A$,X,1) 
—► 10 A$= "DRACHEN" 

20 X=X+1 

30 B$=MID$(A$,X,1) 


40 PRINT B$ "=" ASC(B$) 

50 IF X=7 THEN END 
60 GOTO 20 

Es gibt noch einen STRING-Befehl, der uns das Zählen 
der Zeichenzahl für die Prüfung in Zeile 50 abnimmt. Er 
heißt 

LEN(String) 

Er ist eine Abkürzung von Length, was auf deutsch 
»Länge« heißt. Er wird seinem Namen gerecht und 
bestimmt die Länge des Strings. 

Wenn Sie direkt eingeben: 

—► PRINT LEN("DRACHEN") 
dann erhalten Sie die Zahl 7 als Resultat. 

Um ihn im obigen letzten Programmbeispiel einzuset¬ 
zen, brauchen wir lediglich die Zeile 50 ändern: 

—► 50 IF X=LEN(A$) THEN END- 
So prüft sie X so lange, bis es den Wert von LEN(A$), 
nämlich 7 erreicht hat. 

Basic-Befehl Nr. 20 LEN(String) 

- gibt die gesamte Länge des Strings einschließlich der 
Leerzeichen und Steuerzeichen als Zahl aus 

- in der Klammer kann ein String oder aber eine String- 
Variable sein, der ein String zugewiesen worden ist 

14.3. Die Addition von Strings 

In Abschnitt 6.2, bei der Diskussion der String-Variablen, 
haben wir bereits mit zusammengehängten Strings experi¬ 
mentiert, unter Verwendung des PRINT-Befehls: 

110 A$="H0LZ" 

115 B$="FEUER" 

120 PRINT A$B$ 

Das Resultat der Zeile 120 ist das Wort HOLZFEUER. 
Dabei i it es egal, ob Sie in Zeile 120 zwischen den beiden 
Stringvariablen ein Semikolon, einen Zwischenraum oder, 
wie oben, beide aneinander schreiben. 

Wenn wir aber dem »HOLZFEUER« eine eigene Variable 
zuordnen wollen, müssen wir A$ und B$ addieren, unter 
Verwendung des »+«-Zeichens. 

125 C$=A$+B$ 

130 PRINT C$ 

Zeile 120 und Zeile 130 ergeben das gleiche Resultat, nur 
hat sich der Computer die neue Stringvariable C$ gemerkt; 
das Resultat der Addition ist dadurch auch noch später ver¬ 
fügbar. 

Nicht ganz so selbstverständlich wie Strings mit Buch¬ 
staben sind Strings, die aus Zahlen bestehen. 

135 X$="7" 

140 Y$="5" 

145 Z$=X$+Y$ 

150 PRINT Z$ 

Zeile 150 druckt die Zahl 75 aus. Bemerkenswert ist 
dabei, daß in der String-Form die Ziffern ohne den sonst 
üblichen freien Platz für ein eventuelles negatives Vorzei¬ 
chen gedruckt werden. 

Wir haben in Lektion 13 gelernt, Steuerzeichen wie zum 
Beispiel »CURSOR-LINKS«, »REVERSE-ON« innerhalb 
von Anführungszeichen in Ihre Programme einzubauen. 
Nun, da diese auch Strings darstellen, können wir sie eben¬ 
falls mit anderen Strings zusammensetzen. 

155 L$= " [CTRL+RVS-ON] " 

160 M$= " [CTRL+RVS-OFFj" 

165 PRINT L$+B$+M$+A$ 

Zeile 165 druckt das Wort FEUERHOLZ aus, wobei der 
Wortteil FEUER in reverser Darstellung erscheint. Zu guter 
Letzt sollen die Zeilen 170 bis 195 zeigen, daß auch die 
Grafikzeichen, die vorn auf den Tasten stehen und auf die 
mit der SHIFT- oder der CBM-Taste umgeschaltet wird, als 
Strings addiert werden können. 
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170 Q$=" [SHIFT+O/CBM+Y/SHIFT+Pj " 

175 R$=" (3mal CRSR-LINKSj " 

180 S$=" [CRSR-DOWN)" 

185 T$=" [shift+l/cbm+p/shift+@3 " 

190 U$=Q$+R$+S$+T$ 

195 PRINT U$ 

In Zeile 190 wird eine Stringvariable U$ definiert, die aus 
6 Zeichen und mehreren Cursorbewegungen besteht, 
wodurch ein Rechteck gezeichnet wird. In Zeile 195 wird 
dieses Rechteck ausgedruckt. 

Wenn wir die Zeile 195 so abändern: 

195 PRINT U$;:G0T0 195 

wird in einer »ewigen« Schleife das Rechteck diagonal über 
den Bildschirm gedruckt. 

Die aus einzelnen Zeichen zusammengesetzte Form 
wird wie ein einzelnes neues Zeichen behandelt! 

Diese Additionsmethode für Strings kann in vielen Pro¬ 
grammarten sehr sinnvoll eingesetzt werden. 


FAZIT 

1. Durch Addition von einzelnen Strings werden neue, län¬ 
gere Strings gebildet. 

2. Aus einzelnen Buchstaben pro Variable entstehen so 
einzelne Wörter pro Variable, aus diesen wiederum ein 
ganzer Satz pro Variable. 

3. Eine String-Variable kann maximal 255 Zeichen enthal¬ 
ten. 

Eine derart zusammengesetzte String-Variable kann aus 
Buchstaben, grafischen Zeichen, Ziffern und Steuerzei¬ 
chen bestehen. 


14.4. Der Größenvergleich von Strings 

Beim Stringvergleich mit > und < muß der Programmie¬ 
rer wissen, was einen »größeren« String ausmacht. Ich 
möchte es Ihnen mit einem kleinen Versuch deutlich 
machen. 

310 INPUT "STRING #1";A$ 

320 IF A$="@" THEN END 
330 INPUT "STRING #2";B$ 

Wir geben also zwei Strings in den Zeilen 310 und 330 
ein. Zeile 320 erlaubt uns den Aussprung aus der Schleife 
mit der Klammeraffen-Taste. 

Jetzt vergleichen wir die beiden Strings: 

340 IF A$ > B$ THEN PRINT "#1" 

350 IF A$ < B$ THEN PRINT "#2" 

360 GOTO 310 

Die Vergleiche in Zeile 340 und 350 wählen beide den 
größeren String zum Ausdrucken aus. 

Lassen Sie das Programm laufen und experimentieren 


Das Beispiel oben zeigt, daß natürlich auch Zahlen- 
Strings größer oder kleiner sein können, genauso wie 
gemischte Strings (WORT 2). 


FAZIT 

1. Werden Strings miteinander verglichen, vergleicht der 
Computer schrittweise die ASCII-Codewerte der einzel¬ 
nen Zeichen. Die erste Ungleichheit entscheidet, wobei 
dann der String mit dem höheren ASCII-Codewert »grö¬ 
ßer« ist. 

2. Da der Stringvergleich sich auf ASCII-Codewerte 
bezieht, wird kein Unterschied gemacht zwischen Buch¬ 
staben, Zeichen oder Ziffern. 


14.5. Verwandlung von Strings und Zahlen 

Im Abschnitt 14.3 haben wir gesehen, daß Zahlen als 
Strings verarbeitet werden, wenn sie in Anführungszeichen 
stehen. Das hat unter anderem den Vorteil, daß kein Leer¬ 
zeichen für das Vorzeichen reserviert wird. 

10 A$="123" 

15 PRINT A$ 

druckt die Zahl ganz an den linken Rand. 

Es gibt zwei Befehle, die uns erlauben, Strings in Zahlen 
und Zahlen in Strings zu verwandeln: 

Der eine der beiden heißt VAL(A$). Sein Name ist von 
VALUE (Wert) abgeleitet. Er wandelt A$ in einen Zahlenwert 
um, falls überhaupt in A$ eine Zahl vorkommt. 

20 PRINT VAL(A$) 

Diese Zeile druckt ebenfalls die Zahl 123 aus, aber eben 
als Zahl, das heißt mit einer Leerstelle vor ihr. 

Ist in dem String keine Zahl enthalten, dann wird der Wert 
Null ausgegeben. 

II .11 II *»*>■ B$= "ABC" 

30 PRINT VAL(B$) 

Wenn wir statt »ABC« den String »A2C« schreiben, er¬ 
halten wir immer noch Null, weil der String mit einem Buch¬ 
staben anfängt. 

Ist B$ aber »12C«, dann ergibt der VAL-Befehl die Zahl 12. 


Basic-Befehl Nr. 21 VAL(A$) 

- Der Befehl VAL(A$) liefert den numerischen Wert von A$ 

- Dieser String kann sowohl in dem $-Zeichen als auch in 
Anführungszeichen geschrieben sein 

- VAL(A$) fragt den String A$ Zeichen für Zeichen nach 
einer Zahl ab. Ab dem ersten Zeichen, das keine Zahl ist, 
stoppt er die Suche und verwendet den Wert des bisheri¬ 
gen Teils weiter 

- Wenn der String A$ keine Zahlen enthält, wird der Wert 0 
gebildet 


Sie ein bißchen. 

Sie werden zum Beispiel sehen: 

»A« ist größer als »B« 

»ACB« ist größer als »ABC« 

»TISCHE« ist größer als »TISCH« 

»WORT 2« ist größer als »WORT 1« 

Ich will Ihnen verraten, was der Computer macht. 

Er vergleicht die ASCII-Codewerte der einzelnen Buch¬ 
staben von links aus. Zur Erinnerung, der ASCII-Code ist 
eine Zahl, mit der der Computer ein Zeichen intern kenn¬ 
zeichnet (siehe Lektion 13). 

Das A hat den ASCII-Wert 65, B den Wert 66, C den Wert 
67. Sowohl bei ACB als auch bei ABC ist das erste Zeichen 
gleich, aber von den zweiten Zeichen ist C größer als B. Im 
Beispiel TISCH E-TISCH macht das zusätliche E den Unter¬ 
schied im String 2. 

Beim Vergleich von WORT 2 mit WORT 1 hat die Ziffer 2 
einen höheren ASCII-Codewert als die Ziffer 1. 


Die Umkehrung von VAL ist der Befehl STR$(X), abgelei¬ 
tet von STRING. Er wandelt die Zahl X in einen String um. 
Wozu das gut ist, zeigen uns die nächsten Zeilen: 

35 X=123 
40 Y=456 
45 PRINT X+Y 

Das Resultat der Zeile 45 ist natürlich die Summe der bei¬ 
den Zahlen, also 579, mit einer Leerstelle ausgedruckt. 

50 PRINT XjY 

Diese Zeile dagegen setzt beide Zahlen nebeneinander, 
getrennt durch zwei (!) Leerstellen, eine für das Vorzeichen, 
die zweite für die Trennung zweier unabhängiger Zahlen: 

123 456 

Diese zweite Trennung heben wir auf mit der Verwen¬ 
dung des STR$-Befehls: 

55 PRINT STR$(X);STR$(Y) 

Wir erhalten: 

123 456 
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Aber Sie sehen, daß X und Y immer noch Zahlen sind, 
obwohl sie über STR$ als Strings behandelt werden. 

Erst die Zeile: 

60 PRINT "123";"456" 

macht echte Strings aus den Zahlen und vermeidet alle 
Zwischenräume. 

123456 

Leider können wir in dieser Version mit den Zahlen nicht 
mehr rechnen. Mit STR$ geht das aber, was die nächsten 
Zeilen 65 bis 75 zeigen. 

65 FOR Z=0 TO 2 

70 PRINT STR$(X+Z);STR$(Y) 

75 NEXT Z 

Wir erhalten die Zahlenreihen 

123 456 

124 456 

125 456 


Basic-Befehl Nr. 22 STR$(X) 

- der Befehl STf?$(X) bildet aus dem Wert der Zahl X einen 
String 

- dieser String behält die Leerstelle für das Vorzeichen 


LEKTION 15: 

Ein Programm mit den String-Befehlen 


Ich möchte mit Ihnen zusammen ein zweites Programm 
entwickeln, welches hauptsächlich die Stringbefehle ver¬ 
wendet und Ihnen ein bißchen Erfahrung in der String- 
Verarbeitung gibt. 

Aufgabe: s^en on 

Im ersten Teil des Programms sollen eingegebene Wör¬ 
ter in einen Geheimcode umgewandelt werden. Die ver¬ 
wandelten Wörter stehen alle auf dem Bildschirm. 

Per Tastendruck soll dann der zweite Programmteil ange¬ 
sprungen werden, in dem die einzelnen Codewörter wieder 
in ihre ursprüngliche Form zurückgewandelt (dekodiert) 
werden. 

Der übersichtlichen schrittweisen Darstellung zuliebe 
verzichte ich auf ein Flußdiagramm. Wir »hacken« uns also 
durch. 

Die Eingabe der Wörter machen wir zuerst über den 
GET-Befehl. Sie wissen, daß der GET-Befehl immer nur ein 
Zeichen annimmt, aber keine ganzen Wörter. Wir müssen 
also erst eine Schleife bauen, um die einzelnen Zeichen zu 
einem Wort zusammenzusetzen. 

100 GET W$: IF W$="" THEN 100 
120 PRINT W$; 

130 A$=A$+W$ 

150 GOTO 100 

Zeile 100 ist die übliche Eingabe-Warteschleife mit GET. 

Zeile 120 druckt jedes einzelne Zeichen W$ mit dem 
Semikolon aneinandergekiebt aus. 

Zeile 130 ist etwas Neues. Es wird ein String mit Namen 
A$ dadurch gebildet, daß zu seinem jeweiligen Zeichen - 
am Anfang ist keines da - das gerade eingegebene Zei¬ 
chen W$ dazugenommen wird. Auf diese Weise entsteht 
ein ganzes Wort A$. 

Der Rücksprung in Zeile 150 läßt dieses Wort unendlich 
lange werden. 

Wir brauchen also am Ende des Wortes einen Aussprung 
aus der Schleife. Ich schlage vor, das Wort mit der 
RETURN-Taste zu beenden. Deshalb müssen wir in Zeile 
140 den ASCII-Code der RETURN-Taste abfragen. Er ist 13. 

140 IF W$=CHR$(13) THEN 170 
170 PRINT"**" 


Die Abfrage kennen wir schon. Sie springt nach 170, wo 
vorläufig zum Ausprobieren zwei Sterne ausgedruckt wer¬ 
den. 


Codier-/De<odier-Algorithmus 


»Algorithmus« ist die Bezeichnung für einen logischen Vor¬ 
gang oder eine Formel, in unserem Fall die Vorschrift, nach 
der das Wort A$ verschlüsselt werden soll. 

Ich habe einen sehr leichten Algorithmus gewählt: 

Der ASCII-Codewert jedes Zeichens wird um die Zahl 
seines Platzes im Wort erhöht, der erste Buchstaben um 1, 
der zweite Buchstaben um 2 und so weiter. 

Das Decodieren geht entsprechend, indem immer die 
Platz-Ziffer abgezogen wird. 

Also müssen wir zuerst das Wort A$ in seine ASCII- 
Codewerte umwandeln. Das haben wir schon einmal 
gemacht. 

In Zeile 160 gebe ich ein Wort für A$ vor, aber nur zum 
Ausprobieren. 

160 A$="WERT" 

170 X=X+1 

180 A=ASC(MID$(A$,X,l)) 

190 B=A+X 
195 PRINT B 

220 IF X < > LEN(A$) THEN 170 

A$ in Zeile 160 sei also das fertig eingegebene Wort. 

Die Zeilen 170 und 220 bilden eine Zählschleife, deren 
Variable X von 1 bis zur Länge des eingegebenen Wortes 
A$ zählt und am Ende weiterspringt. In unserem Beispiel ist 
LEN(A$)=4 Buchstaben. 

Zeile 180 kennen Sie schon. Sie wandelt jeden Buchsta¬ 
ben des Wortes A$ - einzeln wegen der letzten Ziffer 1 - von 
links ab dem X-Zeichen in seinen ASCII-Code um. 

Zeile 190 ist die eigentliche Verschlüsselung oder Codie¬ 
rung. Hier wird eine Variable B dadurch gebildet, daß zum 
ASCII-Wert »A« des gerade umgewandelten Zeichens »A$« 
der jeweilige Wert von X dazugezählt wird. 

Zeile 195 ist eingeschoben, um die neuen ASCII-Werte 
auszudrucken. 

Starten Sie diesen Teil mit RUN 160 und Sie erhalten die 
neue Zahlenfolge 88, 71, 85 und 88. 

Jetzt nehmen wir Zeile 160 heraus, oder beser noch, wir 
wandeln sie in eine REM-Zeile zur Schönschrift um. 

Sie können jetzt mit RUN das Ganze laufen lassen, näm¬ 
lich Eingabe eines Wortes bis zum Ausdruck der neuen 
Codezahlen. Jetzt allerdings erhalten Sie immer eine Zahl 
mehr, als Zeichen eingegeben wurden. Diese zusätzliche 
Zahl entsteht durch die RETURN-Taste. 

Die nächsten drei Zeilen wandeln die verschlüsselten 
Codezahlen »B« in Buchstaben »B$« zurück und setzen sie 
zu einem verschlüsselten Wort »C$« zusammen. 

—► 200 B$=CHR$(B) 

210 C$=C$+B$ 

240 PRINT C$ 

Mit RUN erhalten Sie jetzt auch das verschlüsselte Wort 
ausgedruckt. 

Um mehrere Wörter eingeben zu können, bilden wir mit 
dem GOTO-Befehl der Zeile 260 eine Schleife. Zeile 195 
kann jetzt entfernt werden. 

—*• 195 

260 GOTO 100 

Ein neuer Versuch klappt allerdings nicht. 

Die Eingabe eines zweiten Wortes stößt auf Schwierig¬ 
keiten. Der Grund dafür liegt darin, daß das erste Wort A$ 
noch vorhanden ist. Wir müssen es einfach löschen. Und 
weil wir gerade beim Korrigieren sind: Auch die Zählvaria- 
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ble X muß vor der nächsten Eingabe auf 0 gesetzt werden. 
Der letzte Fehler besteht darin, daß in Zeile 220 der LEN- 
Befehl immer ein Zeichen mehr mißt, weil ja die RETURN- 
Taste am Ende des eingegebenen Wortes für ihn auch als 
Zeichen gewertet wird. 

Hier bietet sich zusätzlich die Gelegenheit, für die 
Schönschrift der Ausgabe etwas zu tun. Mir gefällt nämlich 
nicht, daß beim Ausdrucken zwischen den codierten Wor¬ 
ten kein Zwischenraum gelassen wird. Ich schiebe daher 
die Zeile 230 vor den PRINT-Befehl, um an den bestehen¬ 
den String »C$« - das codierte Wort - ein Leerzeichen mit 
dem ASCII-Code 32 anzuhängen. 

Die folgenden Zeilen korrigieren das alles. 

—► 220 IF X <> LEN(A$)-1 THEN 170 
230 C$=C$+CHR$(32) 

250 A$=*" 

260 X=0: GOTO 100 

In Zeile 220 prüft der IF-THEN-Befehl auf ein Zeichen 
weniger, als das Wort plus RETURN-Taste lang ist. Zeile 
250 zeigt, wie man eine Stringvariable durch Zuweisung 
eines Nullstrings löscht. Dasselbe tut Zeile 260 mit der 
numerischen Variablen X. 

Jetzt läuft der erste Programmteil, der aus einem einge¬ 
gebenen Wort ein verschlüsseltes Wort baut. Wir erhalten 
zum Beispiel für das Wort »WERT« den Code »XGUX«. 

Das Decodieren steile ich mir so vor, daß der Benutzer 
per Tastatur die Codes eingibt, welche er entschlüsseln 
will. Das wollen wir zur Übung diesmal mit INPUT machen. 
—*■ 280 INPUT E$ 

Die nächsten Zeilen gleichen weitgehend den Zeilen 170 
bis 260, da der Vorgang ja fast identisch ist. Eine Ausnahme 
ist die Zeile 190, da wir zum Decodieren ja die Zählvariable 
X abziehen müssen. Außerdem habe ich die beiden Zeilen 
200 und 210 zu einem Ausdruck zusammengefaßt. Und 
schließlich braucht dem LEN-Befehl keine 1 abgezogen 
werden, da beim INPUT-Befehl im Gegensatz zum GET die 
eingegebene RETURN-Taste nicht zum Wort dazugerech¬ 
net wird. Also sieht das Decodieren so aus: 

—► 280 INPUT E$ 

290 X=X+1 

300 E=ASC(MID$(E$,X,1)) 

310 D=E-X 

320 D$=D$+CHR$(D) 

330 IF X < > LEN(E$) THEN 290 
340 D$=D$+CHR$(32) 

350 PRINT D$ 

360 E$="" 

370 X=0:GOTO 280 

Mit RUN 280 können Sie diesen Programmteil separat 
testen. Jetzt müssen wir die beiden Teile noch zusammen¬ 
binden. Ich stelle mir vor, daß es praktisch ist, nach einigen 
eingegebenen Wörtern diese zu decodieren. Das Signal 
dazu soll die Funktionstaste < Fl > sein. Die Arbeitsweise 
der Funktionstasten haben wir noch nicht durchgenom¬ 
men. Springen Sie bitte auf die Lektion 16, bevor Sie mit 
diesem Programm weitermachen. 

Wenn die Funktionstaste gedrückt wird, soll das Pro¬ 
gramm vom Kodierteil auf den Decodierteil springen. 

Diese Prüfung müssen wir ganz am Anfang des Codier¬ 
teils vornehmen, und die GET-Eingabeschleife bietet sich 
dazu in hervorragender weise an. Wir schieben also die fol¬ 
genden drei Zeilen ein: 

—► 110 IF W$=CHR$(133) THEN 270 
270 PRINT"DEKODIEREN" 

285 IF E$="ENDE" THEN END 

Zeile 110 verwendet den ASCII-Code von 133 der 
Fl-Taste, um auf die Zeile vor dem INPUT-Befehl zu sprin¬ 
gen (270), wo ein Hinweis ausgedruckt wird. 

Die Zeile 285 beendet auf simple Weise das Programm. 


Das einzige, was nicht passieren darf ist, daß das Wort 
»ENDE« als codierter Wert auftritt. 

Zur Bedienung des Programms ist zu sagen, daß Sie 
beim Decodieren lediglich die auf dem Bildschirm stehen¬ 
den verschlüsselten Wörter einzeln ablesen und eintippen 
müssen. 

Wem das zu mühsam ist, soll ein Programm für die auto¬ 
matische Decodierung schreiben ! 


FAZIT 

1. Eine String-Variable kann dadurch »gelöscht« werden, 
daß man ihr einen Null-String zuweist mit dem Befehl 
A$= *". 

Das entspricht dem Nullsetzen einer numerischen 
Variablen mit X=0 

2. Funktionstasten und andere Steuertasten, die nicht auf 
dem Bildschirm erscheinen, können nur mit dem GET- 
Befehl abgefragt werden. 

3. Ein String kann durch Hinzufügen von anderen Strings 
zu einem größeren String gleichen Namens erweitert 
werden: A$=A$+B$ 3. 


In Listing 2 ist das komplette Programm wiedergegeben, 
auch hier mit den Prüfsummen der Eingabehhilfe »Check¬ 
summer 64 V3«. 

Und jetzt kommen im Nachtrag die Funktionstasten an 
die Reihe. 

LEKTION 16: Die Funktionstesten 


Ich möchte gern einen Rücksprung machen zu der Tabelle 
der Steuertaste und ihrer ASCII-Codewerte. 

Da f 'ien Sie als untersten Block die Funktionstasten 
<F1 > bis <F8> angegeben. In diesem Kurs werden sie 
da praktisch zum ersten Mal erwähnt. Jetzt wird es langsam 
Zeit, näher darauf einzugehen. 


10 PRINT"***» KODIEREN/DEKODIEREN **** 

<206> 

20 : 

<252> 

30 : 

<006> 

100 GET WS--IF W$r- THEN 100 

<160> 

110 IF W$=CHR$(133) THEN 270 

<068> 

120 PRINT W$; 

<065> 

130 A$=A$+W$ 

<248> 

140 IF W$=CHR$<13) THEN 170 

<142> 

150 GOTO 100 

<078> 

160 REM--- 

<253> 

170 X=X+1 

<198> 

160 A=ASC(MID$< AS■X,1> > 

<070> 

190 B=A+X 

<219> 

200 BS=CHR$ < B) 

<105> 

210 C$=C$+B$ 

<123> 

220 IF X<>LEN(AS)-1 THEN 170 

<233> 

230 C$=CS+CHR$< 32) 

<011> 

240 PRINT CS 

<178> 

250 A$="" 

<023> 

260 X=0:GOTO 100 

<208> 

265 REM-- 

<254> 

270 PRINT"DEKODIEREN" 

<014> 

280 INPUT ES 

<156> 

285 IF E$="ENDE" THEN END 

< 191 > 

290 X=X+1 

<064> 

300 E-ASC(MIDS(ES,X.1)) 

<212> 

310 D=E-X 

<189> 

320 D$=D$+CHR$(D) 

<246> 

330 IF XoLEN (ES) THEN 290 

<117> 

340 D$=DS+CHRS< 32 ) 

<159> 

350 PRINT D$ 

<042> 

360 ES- 

< 151 > 

370 X=0:GOTO 280 
© 64'er 

<199> 

Listing 2. Kodieren und Dekodieren mit den String- 

Befehlen 
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Wenn Sie eine der Funktionstasten drücken, passiert 
bekanntlich gar nichts - oder doch? 

Nun, sie haben einen eigenen ASCII-Code. Mit einem 
kleinen Programm, das wir bei der Besprechung der ASCII- 
Codes verwendet haben, können wir diese Behauptung 
hier noch einmal überprüfen. Das Programm sah so aus: 
—► 10 INPUT A$ 

20 A=ASC(A$) 

30 PRINT A 
40 GOTO 10 

Nicht nur die Funktionstasten, sondern auch alle ande¬ 
ren Steuertasten geben so ihren ASCII-Code preis. 

Diesen Code können wir zur Abfrage der Tasten, ob sie 
nämlich gedrückt worden sind, verwenden. 

Fügen Sie bitte die folgende Zeile 35 ein: 

—► 35 IF A=65 THEN PRINT "SERVUS" 

Das Programm funktioniert wie vorher, nur wenn wir das 
»A« drücken, dessen ASCII-Code 65 ist, wird der freundli¬ 
che Gruß ausgedruckt. Statt 65 können Sie jeden beliebi¬ 
gen Codewert verwenden und damit das Drücken der ent¬ 
sprechenden Taste abfragen. 

Halt! Das stimmt nicht ganz. Denn wenn Sie in Zeile 35 
den Codewert einer der Funktionstasten eingeben, rührt 
sich kein SERVUS. 

Warum nicht? 

Vielleicht erinnern Sie sich, daß im Unterschied zum 
GET-Befehl, der im Tastaturpuffer nachschaut, ob dort ein 
Zeichen abgospoichert ist, der INPUT-Bofehl alle oinge- 
gebenen Zeichen erst auf den Bildschirm bringt und sie von 
dort dann weiterverarbeitet. 

Das ist des Rätsels Lösung, denn die Funktionstasten 
hinterlassen halt keine Spur auf dem Bildschirm, genauso 
wenig wie alle anderen Steuertasten. Das heißt, zu deren 
Abfrage müssen wir den GET-Befehl nehmen. 

Ändern wir also die Zeile 10 ab: 

—*• 10 GET A$: IF A$="" THEN 10 
Jetzt geht es!! 

Zur Demonstration der Abfrage der Funktionstasten 
habe ich unser kleines Programm wie folgt erweitert: 

—*■ 10 GET A$: IF A$="" THEN 10 
20 A=ASC(A$) 

30 PRINT A 

35 IF A=133 THEN PRINT CHR$(158) 

36 IF A=134 THEN PRINT CHR$(154) 

37 IF A=135 THEN PRINT CHR$(19) 

38 IF A=136 THEN PRINT CHR$(l47) 

40 GOTO 10 

Die Zeilen 35 bis 38 bilden einen Abfrageblock für die vier 
Funktionstasten <F1>, <F3>, <F5> und <F7>. 

Wenn ihr ASCII-Code auftritt, dann drucken sie das Zei¬ 
chen des hinter dem jeweiligen CHR$-Befehl stehenden 
Codewertes aus. Da diese Codewerte aber die Werte der 
Steuerzeichen - der Reihe nach - GELB, HELLBLAU, 
CURSOR HOME und BILDSCHIRM LÖSCHEN sind, wer¬ 
den diese Funktionen ausgeführt. 

Das ist also das Kochrezept zur Nutzbarmachung der 
Funktionstasten. Aber auch alle anderen Tasten können so 
abgefragt und zur Steuerung irgendwelcher Programm¬ 
schritte verwendet werden. Wir werden diese Methode 
auch noch benützen. 

Übrigens, wenn Sie nur eine einzige Taste abfragen, 
deren Codewert aber nicht ausdrucken beziehungsweise 
nicht weiterverwenden, geht die Abfrage von oben dadurch 
schneller, daß Sie den String gar nicht erst lange umwan¬ 
deln: 

—► 10 GET A$: IF A$="" THEN 10 

35 IF A$=CHR$(133) THEN PRINT CHR$(150) 

Die Prüfzeile 35 vergleicht einfach den eingegebenen 
String A$ mit dem String, der dem ASCII-Code 133 ent¬ 


spricht - der CHR$-Befehl macht das möglich. Nur bei vie¬ 
len Abfrage-IFs ist das Tippen der vielen CHR$ mühsam 
und die ASC-Methode von vorher hat ihre Berechtigung. 


LEKTION 17: 

Daten aus dem Keller holen 


Es gibt Situationen im Programmierleben, in denen es wün¬ 
schenswert wäre, auf einen ganzen Stall voll Zahlen oder 
Wörter zurückgreifen zu können, ohne sie jedesmal per 
INPUT oder GET mühsam in den Computer eingeben zu 
müssen. Einmal eingegeben, sollten sie immer zur Verfü¬ 
gung stehen. 

Diese Anforderung zeigt deutlich in Richtung »Speiche¬ 
rung von Daten« im Computer. Nun, wenn wir einer String- 
Variablen in einer Befehlszeile einen String zuordnen, wird 
dieser bekanntlich auch gespeichert. Aber das würde dazu 
führen, daß wir beispielsweise 5 Zuordnungen machen 
müßten, um 5 Strings zu speichern, etwa so: 

—► 10 A$="BUCH" 

20 B$="SCHULTER" 

30 C$="SCHIFF" 

40 D$="TISCH" 

50 E$="MALEREI" 

Bei 5 Strings geht es ja noch, aber bei 30 oder gar bei 
200? Diesen Notstand stellt BASIC ab mit dem Befehl 

DATA 

Hinter diesem Befehl können in einer Befehlszeile so viel 
Zahlenwerte oder Strings geschrieben und dadurch 
gespeichert werden, wie in einer Programmzeile Platz 

haben 

Alle Eintragungen in einer DATA-Zeile müssen durch 
Kommata getrennt sein. 

Das Beispiel oben, das Sie bitte vor der Eingabe der 
nächsten Zeilen mit NEW löschen sollten, sieht jetzt so aus: 
—*• 10 DATA BUCH,SCHULTER,SCHIFF,TISCH,MALEREI 

Sie sehen, die Strings brauchen nicht in Anführungs¬ 
zeichen stehen, mit einer Ausnahme. Diese ist weiter unten 
im Kasten beschrieben. 

Eine DATA-Zeile mit Zahlen sieht so aus: 

—► 20 DATA 25,123,225,16,24 

Jetzt muß noch geklärt werden, wie man eigentlich die 
gespeicherten Daten herausholen kann. 

Nun, das geht erstens immer der Reihe nach, und zwei¬ 
tens mit dem Basic-Befehl 

READ 

was leicht und treffend mit »LESEN« übersetzbar ist. Pro¬ 
bieren wir es: 

—► 40 READ A$ 

50 PRINT A$ 

Nach RUN druckt das Programm das erste der Wörter in 
der DATA-Zeile, nämlich »BUCH« aus. An die anderen kom¬ 
men wir nicht heran. 

Wenn Sie in Zeile 40 und 50 die Variable in eine numeri¬ 
sche Variable verwandeln, kommen wir trotzdem nicht an 
die Zahlen. Zusätzlich bestraft uns der Computer mit einer 
Fehlermeldung. 

Bauen wir also eine Schleife ein, um den READ-Befehl 
fünfmal zu wiederholen. 

—► 30 F0R X=1 T0 5 
60 NEXT 

Jetzt tauchen alle 5 Wörter auf. Eine Erhöhung der 
Schleifenvariablen X auf 6 quittiert der Computer nach 
RUN wieder mit einer Fehlermeldung, da wir mit der String¬ 
variablen A$ in den Bereich der Zahlen eingedrungen sind, 
wodurch Variablentyp und Wert nicht zusammenpassen. 
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Eine zweite Schleife schafft Abhilfe: 

—► 70 FOR X=1 TO 5 
80 READ A 
90 PRINT A 
100 NEXT 

Wenigstens soweit haben wir es gebracht, daß wir alle 
gespeicherten Daten aus dem Speicher holen können. 

Erproben Sie noch durch eine Erhöhung des Endwertes 
der Schleife in Zeile 70 auf 10, was passiert, wenn wir mehr 
Daten READen wollen, als vorhanden sind. Sie werden 
merken, daß das nicht geht, weniger dagegen schon. 

Wirwollen uns jetzt auf nur einen Datentyp beschränken. 
Löschen Sie bitte die Zeilen 70 bis 100. 

Ein weiteres Experiment besteht darin, den READ- 
Vorgang endlos zu wiederholen mit einer neuen Zeile 70. 
—-*• 10 DATA BUCH,SCHULTER,SCHIFF,TISCH,MALEREI 
30 FOR X=1 T0 5 
40 READ A$ 

50 PRINT A$ 

60 NEXT 
70 GOTO 30 

Auch dieser Versuch schlägt fehl. 

Der Grund dafür liegt im Verfahren des READ-Befehls, 
nämlich einen internen Zähler mitlaufen zu lassen, der 
anzeigt, auf das wievielte Wort der READ-Befehl zugreifen 
muß. Und im obigen Fall ist dieser Zähler durch die Wieder¬ 
holung mit GOTO 30 über die vorhandenen 5 Wörter hin¬ 
ausgelaufen. 

Ein zu READ-DATA gehörender Basic-Befehl stellt die¬ 
sen Zähler wieder an seinen Anfang zurück. Der Befehl lau¬ 
tet: 

RESTORE 

was soviel heißt wie »wiederherstellen«. Oben vor den 
GOTO-30-Befehl gestellt, setzt RESTORE in der Tat alles 
zurecht: 

—► 65 RESTORE 

Die jetzt erreichte Endlos-Schleife kann mit der STOP- 
Taste abgewürgt werden. 


Basic-Befehle Nr. 23, 24 und 25 READ, DATA und 

RESTORE 

- mit DATA können beliebig viele Zahlen und Strings in 
einem Programm gespeichert werden 

- sie stehen hinter dem DATA-Befehl, durch Kommata von¬ 
einander getrennt 

- Strings brauchen nicht zwischen Gänsefüssen stehen, 
es sei denn, sie enthalten als Teil des Strings ein Komma 
oder ein Semikolon. Da diese besondere Steuerzwecke 
erfüllen, muß in diesem Fall der String zwischen Gänse- 
füsse gesetzt werden 

- mit dem Befehl READ werden die Daten der Reihe nach 
gelesen. Datentyp und Variablentyp müssen einander 
entsprechen 

- sollen die Daten mehrfach ausgelesen werden, muß mit 
RESTORE der Anfangszustand des Auslesens herge¬ 
stellt werden 


Ein lustiges Experiment will ich Ihnen noch zeigen, bevor 
wir ein weiteres Programm angehen. 

Schreiben Sie die FOR-NEXT-Zeile 30 so wie ange¬ 
geben und vertauschen Sie NEXT mit PRINT A$. 

—► 30 FOR X=1 T0 INT(RND(0)*5+1 
40 READ A$ 

50 NEXT 
60 PRINT A$ 

70 RESTORE 
80 GOTO 30 

Zeile 30 müßte Ihnen bekannt Vorkommen. Die obere 
Grenze der Schleife wird jetzt per Zufall bestimmt. Sie kann 


nach unserem Kochrezept von früher die Werte 1 bis 5 
annehmen, aber wie gesagt, vom Zufall bestimmt. 

Da PRINT nach der Schleife kommt, druckt er nur das 
zuletzt gelesene Wort aus. Wir treffen somit eine zufällige 
Auswahl aus der Menge der gespeicherten Wörter, was wir 
beim nächsten Programm verwenden werden. 

LEKTION 18: 

Ein Programm mit READ-DATA 


Das Programm stammt ebenfalls aus dem schon mehrfach 
zitierten Buch »Computerspiele und Knobeleien« von 
Rüdeger Baumann. 

Aufgabe: 

- Der Computer hat viele Begriffe gespeichert. In unserem 
Fall sind es 14 Sportarten. 

- Per Zufallsgenerator wird einer der Begriffe ausgewählt. 
Nur seine Länge wird dem Spieler durch Punkte bekannt¬ 
gegeben. 

- Der Spieler rät einen Buchstaben. 

- Das Programm vergleicht diesen Buchstaben mit allen 
Buchstaben des Begriffes und schreibt den Buchstaben 
auf die richtigen Plätze, falls es eine Übereinstimmung 
feststellt. 

- Der Vorgang wird so lange wiederholt, bis das Wort erra¬ 
ten ist. 

- Zum Abschluß gibt der Spieler das komplette Wort ein. 
Ich möchte das Programm blockweise mit Ihnen durch¬ 
gehen. 

Zeile 10 löscht den Bildschirm - diesmal mit dem ASCII- 
Code! 

Die Zeilen 80 bis 180 enthalten mit PRINT-Befehlen die 
Spielo.;! rHtung. 

In den DATA-Zeilen 730 bis 760 sind die Sportarten 
gespeichert. 

In den Zeilen 240 bis 260 wird in der vorher schon ver¬ 
wendeten Art und Weise per Zufall eine Sportart U$ ausge¬ 
währt. 

Zeile 290 mißt die Länge des Wortes U$. Die Zeile 300 
erfindet ein Hilfswort H$, welches am Anfang nur aus Punk¬ 
ten besteht, und zwar aus genau so vielen, wie der Sportbe¬ 
griff lang ist. 

Jetzt folgt der erste Versuch. 

Zeile 370 druckt als Eingabebereitschaftszeichen 
(»Prompt« genannt) das punktierte Hilfswort H$ aus, um die 
Länge anzuzeigen. 

In Zeile 390 wird per INPUT ein Buchstaben L$ angefor¬ 
dert und eingegeben. Wird gleich das ganze Wort eingege¬ 
ben und ist es richtig, springt die Zeile 400 auf den 
Abschnitt der Entscheidung über Spielwiederholung ab 
Zeile 600. 

Zeile 410 ist die Sicherung gegen unbeabsichtigtes 
Drücken der RETURN-Taste ohne Eingabe. 

Der schwierigste Teil des Programms ist der Vergleich 
des eingegebenen Buchstabens mit dem vorgegebenen 
Sportbegriff. Er beginnt ab Zeile 610. 

Zeile 480 und 530 bilden eine Zählschleife in der Länge 
des vorgegebenen Sportbegriffs U$. Innerhalb dieser 
Schleife holt Zeile 490 die einzelnen Buchstaben aus dem 
Wort U$ heraus - mit der Methode des MID$-Befehls. Zeile 
500 macht dasselbe im Gleichtakt für das (gepunktete) 
Hilfswort H$. 

Zeile 500 vergleicht jetzt zuerst den eingegebenen - 
geratenen - Buchstaben L$ mit jedem einzelnen Buchsta¬ 
ben B$ des Wortes U$. Ist er identisch, wird ein neues Hilfs¬ 
wort N$ aus dem richtig geratenen Buchstaben L$ gebildet. 
War der Buchstabe falsch, dann wird aus dem Hilfswort H$ 
ein Punkt in das neue Hilfswort N$ übernommen. 

Q3Qji. 
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Das wird für alle Stellen der gleichlangen Wörter U$ und 
H$ gemacht. 

Danach wird in Zeile 540 das Hilfswort N$, das jetzt viel¬ 
leicht schon eine Kombination aus Punkten und Buchsta¬ 
ben ist, dem alten Hilfswort H$ zugeordnet, welches ja dem 


10 PEINT CHR3<147) <039> 

20 PRINT"***** BEGRIFFE RATEN ****** <211> 

30 PRINT <132> 

40 : <016> 

50 REM-SPIELANLEITUNG- <206> 

60 : <036> 

70 : <046> 

80 PRINT"DER COMPUTER DENKT SICH EINE <155> 

90 PRINT 11 SPORTART. <175> 

100 PRINT"SIE SOLLEN SIE ERRATEN. <138> 

110 PRINT <212> 

120 PRINT"SIE KOENNEN EINEN BUCHSTABEN <097> 

130 PRINT"EINGEBEN, DANN ERSCHEINEN <187> 

140 PRINT"DIE GERATENEN BUCHSTABEN AN <076> 

150 PRINT"DER RICHTIGEN STELLE. <165> 

160 PRINT <006> 

170 PRINT"HABEN SIE DAS WORT ERRATEN, <021> 

180 PRINT"GEBEN SIE ES KOMPLETT EIN. <169> 

190 : <166> 

200 = <176> 

210 REM.WORT AUSWAEHLEN- <243> 

220 : <196> 

230 : <206> 

240 FOR X=1 TO INT<RND(0)*14)+1 <155> 

250 READ U$ <004> 

260 NEXT <016> 

270': <248> 

280 H$="“ <083> 

290 FOR X=1 TO LEN(U$) <242> 

300 H$=H$+".“ <008> 

310 NEXT <066> 

320 : <042> 

330 : <052> 

340 REM-RATEVERSUCH. <160> 

350 : C «072> Ci 

360 PRINT:PRINT <058> 

370 PRINT"GESUCHT WIRD: ";H$ <073> 

380 PRINT <228> 

390 INPUT"WAS RATEN SIE";LS <220> 

400 IF L$=U$ THEN 600 <117> 

410 IF LEN(LS)>1 THEN 360 <067> 

420 : <142> 

430 : <152> 

440 REM-HILFSWORT- <065> 

450 : <172> 

460 : <182> 

470 N$ = <041> 

480 FOR X=1 TO LEN(US> <176> 

490 B$=MID$(U$,X.1) <196> 

500 C$ = MID$< H$.X,1) <076> 

510 IF L$=B$ THEN N$=N$+L$:GOTO 530 <010> 

520 N$=N$+C$ <067> 

530 NEXT <032> 

540 H8=N$ <095> 

550 GOTO 360 <082> 

560 : <028> 

570 : <038> 

580 REM- NOCH EINMAL ? -.. <043> 

590 : <058> 

600 PRINT <194> 

610 PRINT"SIE HABEN RICHTIG GERATEN <116> 

620 PRINT <214> 

630 PRINT"NOCH EINMAL (J/N) ? <096> 

640 GET A$: IF A$="" THEN 640 <166> 

650 IF A$="J" THEN RUN <166> 

660 PRINT <254> 

670 PRINT"AUF WIEDERSEHEN <006> 

680 : <148> 

690 : <158> 

700 REM-WOERTERSPEICHER- <211> 

710 = <178> 

720 : <188> 

730 DATA FUSSBALL,HOCKEY,GOLF,BOXEN <115> 

740 DATA TURNEN.SCHWIMMEN,HOCHSPRUNG <099> 

750 DATA SEGELN,FECHTEN,JUDO,BASKETBALL <137> 
760 DATA KEGELN,SCHIFAHREN,TENNIS <102> 

© 64’er 


Listing 3. Ein kleines Spiel 


Spieler beim nächsten Ratevorgang gezeigt wird (Zeile 
370). 

Danach wird der Ratevorgang in Zeile 390 und damit der 
ganze Ablauf wiederholt. 

Jedesmal, wenn ein Buchstabe richtig geraten ist, 
kommt er an die entsprechende Stelle der Hilfswörter N$ 
und H$. 

Erst wenn der Spieler das ganze Wort kennt und es kom¬ 
plett in Zeile 390 eingibt, springt, wie schon erwähnt, Zeile 
400 nach Zeile 600, wo von 630 bis 670 in üblicher Manier 
die Frage nach Wiederholung des Spiels oder Ende gestellt 
wird. 

Alle anderen Zeilennummern dienen der Lesbarkeit und 
der Schönschrift des Programms. 

Das komplette Programm, mit Verzierungen zur besse¬ 
ren Lesbarkeit, ist in Listing 3 wiedergegeben. 


LEKTION 19: Variable in Feldern (Arrays) 


Ich lade Sie zu einem Experiment ein. 

Wir stellen uns vor, wir benötigten in einem Programm 
eine Tabelle mit Zahlen, zum Beispiel die Anzahl der 
Bewohner, die in 10 einstöckigen Häusern in einer langen 
Straße wohnen. Die Adresse der Häuser unterscheidet sich 
nur durch die Hausnummer, denn der Straßenname bleibt 
ja gleich. Statt des langen Straßennamens nehmen wir nur 
einen Buchstaben, zum Beispiel T. Zur Kennzeichnung der 
10 verschiedenen Adressen hängen wir die Ziffern 0 bis 9 
hinten an. Die Zahl 10 können wir nicht nehmen, weil nach 
Punkt 3 des obigen Fazits die zweistelligen Variablen¬ 
namen TI und T10 identisch sind. 

Ir. unserem Beispiel wollen wir den einzelnen Häusern 
Bewonnerzahlen zuweisen, die jeweils um 2 größer sind als 
die Hausnummer. 

10 T0=2 
20 Tl=3 
30 T2=4 
40 T3=5 
etc. 

100 T9=ll 
110 PRINT TO;TI; 
etc. bis T9 

Das ist natürlich eine sehr umständliche Arbeit, und lang¬ 
weilig ist diese dauernde Wiederholung obendrein. 

Also, wie geht das einfacher und eleganter? Natürlich mit 
einer FOR-TO-NEXT-Schleife, aber aufgepaßt: bei ihrer 
Verwendung müssen wir die Hausnummer N in Klammern 
dem Straßennamen T anhängen. Anders akzeptiert das 
der C64 in Basic nicht. 

Als Programm sieht das so aus: 

10 FOR N=0 TO 9 
20 T(N)=N+2 
30 PRINT T(N) 

40 NEXT N 

Ihnen ist natürlich klar, daß Straßenname T plus Haus¬ 
nummer (N) eine Variable ist, der wir Werte (Bewohner) 
zuweisen. Aber eins sollte Sie stutzig machen. Wie unter¬ 
scheiden sich diese speziellen Variablen voneinander? 
Sind T(3) und T(8) nicht identisch, wenn nach der oben 
schon zitierten Regel nur die ersten beiden Zeichen des 
Namens - hier T( - hergenommen werden ? 

Nun, die Klammer macht den Unterschied. Durch sie 
wird ein neuer Typ einer Variablen, eine sogenannte Feld- 
Variable definiert, und Feld-Variablen unterscheiden sich 
durch die Zahl innerhalb der Klammer. Diese Zahl heißt 
Index (Mehrzahl: Indizes). Warum sie ausgerechnet Feld- 
Variable heißt, erkläre ich gleich. 
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Vorher, bei der Schreibweise TO, TI etc. waren wir auf 10 
Variable beschränkt, weil Ti und T10 dieselbe Variable war. 
Jetzt - mit Indizes als Unterscheidungmerkmal - gilt diese 
Beschränkung nicht. Deshalb wollen wir die Anzahl der 
Indizes im Programm noch erhöhen. Bei einem N von 0 bis 
10 geht es ohne Probleme. Aber ab 11 ist schon wieder Feie¬ 
rabend. Wir erhalten die Fehlermeldung »BAD SUBSC¬ 
RIPT ERROR IN 20«. Um Ihnen das zu erklären, muß ich 
genauer beschreiben, was passiert, wenn wir eine Variable 
mit einem Index in Klammern verwenden. 

Wenn wir eine Variable so schreiben: 

T(1)=25 

dann nimmt der Computer an, daß wir in einer Tabelle noch 
mehrere derartige Variable T() verwenden wollen - klar, 
sonst würden wir uns ja die Mühe mit der Klammer nicht 
machen. Um uns die Sache zu erleichtern, reserviert der 
Computer unter dem Variablennamen T in seinem Spei¬ 
cher von vornherein 11 Plätze, für T(0) bis T(10). Diesen 
reservierten Bereich können Sie salopp Tabelle nennen; 
offiziell heißt er Feld oder auf englisch Array. Die alte Regel 
für den Namen der Variablen gilt jetzt auch nicht mehr, 
denn zum Unterscheiden der einzelnen Feld-Variablen 
desselben Anfangsbuchstabens bedient der Computer 
sich der Index-Zahl in der Klammer. 

Die Beschränkung auf eine Feld-(Array-)Größe von 11 
Plätzen wäre natürlich sehr lästig, wenn sie nicht umgan¬ 
gen werden könnte. Wenn wir nämlich mehr Platz brau¬ 
chen, können wir dem Computer mit dem Basic-Befehl 

DIM 

unsere Reservierungswünsche mitteilen. DIM ist eine 
Abkürzung, die aus dem Wort »Dimension« abgeleitet ist. 
Als Beispiel möge die folgende Programmzeile dienen: 

—► 5 DIM T(25) 

Sie reserviert im obigen Programm für die Variable T() im. 
Speicher ein Feld von 26 Plätzen, von T(0) bis T(25j. 

Die Größe eines Feldes ist nur durch den vorhandenen 
Speicherplatz begrenzt. Wenn Sie die Zahl zu groß wählen, 
verweigert der Computer die Reservierung - natürlich erst 
nach dem Befehl RUN - mit OUT OF MEMORY, was soviel 
heißt wie »keinen Platz mehr im Speicher«. 


Basic-Befehl Nr. 26 DIM 

- dieser Befehl wird in der folgenden Schreibweise verwen¬ 
det: DIM Variablenname (Index) 

- er reserviert einen Speicherbereich für eine durch den 
Index festgelegte Anzahl von Variablen desselben 
Namens, die sich nur durch ihren jeweiligen Index unter¬ 
scheiden. Dieser Speicherbereich wird Feld oder Array 
genannt 

- mit DIM können sowohl Felder für numerische, als auch 
für String-Variable reserviert werden. Ein Feld kann 
immer nur einen einzigen Variablentyp enthalten 

- für den Namen und für die Kennzeichnung des Typs der 
Feld-Variablen (vor der Klammer) gelten dieselben 
Regeln wie für alle anderen Variablen 


Ein Feld kann also auch aus String-Variablen bestehen: 

—► 200 DIM A$(25) 

210 A$(0)="FEUER" 

220 A$(l)="ZANGEN" 

230 A$(2)="BOWLE" 


300 F0R N=0 T0 2 
310 PRINT A$(N); 

320 NEXT N 

Dieses kleine Programm reserviert ein Feld von 25 
Strings und weist den ersten dreien davon je ein Wort zu. 


Mit RUN 200 gestartet, druckt es das Wort Feuerzangen¬ 
bowle aus, indem in der Zeile 310 nacheinander für die 
Werte von N=0 bis N=2 die gespeicherten Strings A$(0) bis 
A$(2) durch das Semikolon nach dem PRINT-Befehl anein¬ 
andergeklebt werden. Das Einträgen der einzelnen Werte 
in die Tabelle, das ich in den Zeilen 210 bis 230 vorgenom¬ 
men und danach nur noch angedeutet habe, geht viel ele¬ 
ganter mit den Befehlen READ-DATA, die in der Lektion 17 
beschrieben sind. 

Um das zu zeigen, schlage ich Ihnen eine kleine Anwen¬ 
dung - im Computerdeutsch heißt so ein Programm 
»Utility« - vor, und zwar eine Nachschlagliste von Geburt¬ 
stagen Ihrer Freunde und Verwandten. Natürlich ist das 
keine Utility, deretwegen ich mir einen Computer kaufen 
würde, aber für unsere Zwecke hier ist sie ganz passend. 

Ich lege das Beispiel vorerst einmal auf 5 Namen (N$) 
und dazugehörige Geburtstagsdaten (D$) aus. Wir brau¬ 
chen also 2 Felder mit je 5 Plätzen, dazu zwei DATA-Zeilen 
mit den Eintragungen. Verwenden Sie bitte meine wirr 
erscheinenden Zeilennummern; am Ende passen sie 
schon zusammen. 

Speicher löschen mit NEW 
—► 20 DIM N$(4) 

500 DATA MAX,MORITZ,MARIA,HANS,LUISE 
120 DIM D$(4) 

600 DATA 12.6.52,3.4.60,21.1.40,19.9.56,11.11. 

70 

Denken Sie bitte daran: DIM N$(4) legi 5 Plätze fest, näm¬ 
lich 0 bis 4. 

Denken Sie ebenfalls daran, daß Eintragungen in DATA- 
Zeilen durch ein Komma voneinander getrennt sein müs¬ 
sen. 

So, jetzt brauchen wir für beide Felder eine Schleife, mit 
der di? Eintragungen der DATA-Zeilen mit READ in das 
jweilige Feld gelesen werden. Für das Namensfeld gilt: 

—► 30 F0R 1=0 T0 4 
40 READ N$(I) 

50 NEXT I 

Dasselbe machen wir für das zweite Feld der Geburtstage: 

—► 130 F0R 1=0 T0 4 
140 READ D$(I) 

150 NEXT I 

Jetzt brauchen wir noch einen Programmteil, der nach 
Eingabe eines Namens das dazugehörige Geburtsdatum 
heraussucht und ausdruckt. Für die »Dazugehörigkeit« 
benützen wir die Indizes der Feldvariablen. Das bedeutet 
nichts anderes, als daß zum zweiten Namen N$(2) das 
zweite Datum D$(2) gehört. 

Doch zuerst stellen wir per IN PUT die Frage F$ nach dem 
Namen, dessen Geburtstag wir wissen wollen: 

—► 200 INPUT "NAME";F$ 

Dann vergleichen wir in einer weiteren Schleife die 
gespeicherten Namen N$(l) mit dem gefragten Namen F$. 
Wenn bei einem bestimmten Wert I der Vergleichsschleife 
die beiden Namen gleich sind, wird der Geburtstag mit 
demselben Index I ausgedruckt. Das Programm kann dann 
eine weitere Eingabe eines Namens verlangen (GOTO 
200 ). 

—*• 210 F0R 1=0 T0 4 

220 IF N$(l)=F$ THEN PRINT D$(I):G0T0 200 
230 NEXT I 

Um den Vergleichs- und Entscheidungsvorgang genau 
zu verstehen, brauchen Sie lediglich die Schleifen durch¬ 
zuspielen, indem Sie die Werte von I gedanklich hochzäh¬ 
len und im Programm nachschauen, was passiert. Wir kön¬ 
nen aber zum Verständnis auch eine »Lehrzeile« (mit h !) 
einfügen, die uns den jeweiligen Stand des Vergleiches 
anzeigt: 

—► 215 PRINT I;F$,N$(I);D$(I) 


82 


SONDERHEFT 19 








C64 


GRUNDLAGEN 


Nach RUN und nach Eingabe eines der 5 Namen sehen 
wir am Bildschirm eine Reihe mit steigenden Werten von I, 
daneben (Semikolon!) den eingegebenen Namen, dann in 
einem größeren Abstand (Komma!) die Namen und Daten, 
und zwar so lange, bis F$ und N$ gleich sind. 

Nehmen Sie jetzt Zeile 215 wieder heraus, aber fügen Sie 
bitte eine Zeile 240 dazu, die wir für ein bedienungsfreund¬ 
liches Programm brauchen. Wir müssen nämlich Vorkeh¬ 
rung treffen für den Fall, daß ein Name eingegeben wird, 
der nicht in der Liste steht. Auch Tippfehler fallen in diese 
Kategorie. Wenn kein positiver Vergleich zwischen F$ und 
N$ innerhalb der Schleife auftritt, macht das Programm 
nach der Schleife weiter, mit der neuen Zeile 240, die für 
sich selbst spricht: 

—► 215 

240 PRINT"NAME IST NICHT IN DER LISTE" 

Das ganze Programm sieht so aus: 

—► 20 DIM N$(4) 

30 FOR 1=0 TO 4 
40 READ N$(I) 

50 NEXT I 
120 DIM D$(4) 

130 FOR 1=0 TO 4 
140 READ D$(I) 

150 NEXT I 

200 INPUT "NAME";F$ 

210 FOR 1=0 TO 4 

220 IF N$(I)=F$ THEN PRINT D$(I):GOTO 200 
230 NEXT I 

240 PRINT"NAME IST NICHT IN DER LISTE" 

500 DATA MAX,MORITZ,MARIA,HANS,LUISE 
600 DATA 12.6.52,3.4.60,21.1.40,19.9.56,11.11 
.70 

Der DIM-Befehl und der READ-Befehl haben beide eine 
zusätzliche Eigenschaft, die uns eine wesentliche Verbes¬ 
serung dieses Programms erlaubt: 

Man darf hinter einem einzigen DIM-Befehl mehrere Fel¬ 
der dimensionieren. Sie müssen lediglich durch ein 
Komma getrennt sein. Genauso darf man mit einem einzi¬ 
gen READ-Befehl mehrere Werte-Gruppen auslesen. Hier 
gilt dieselbe Kommaregel wie bei DIM. 

Damit können wir die Zeilen 20 bis 150 stark verkürzen: 
—► 20 DIM N$(4),D$(4) 

30 FOR 1=0 TO 4 
40 READ N$(l),D$(I) 

50 NEXT I 

Die Zeile 20 ist einfach nur eine Zusammenziehung der 
beiden alten Zeilen 20 und 120. Die Funktion des DIM- 
Befehls bleibt dabei erhalten - er dimensioniert halt gleich 
beide Felder. 

Beim »doppelten« READ-Befehl in Zeile 40 hat sich in der 
Arbeitsweise, verglichen mit den alten Zeilen 40 und 140, 
etwas geändert. Schuld daran ist aber die FOR-NEXT- 
Schleife der Zeile 30. 

Bei jedem Wert von I holt nämlich der READ-Befehl zwei 
hintereinanderliegende Werte aus den DATA-Zeilen und 
weist sie den beiden Variablen N$ und D$ zu. Wir müssen 
diesem Vorgang dadurch Rechnung tragen, daß wir den 
Inhalt der DATA-Zeilen umorganisieren. Es müssen jetzt 
immer je ein Name und das dazugehörige Geburtsdatum 
hintereinander kommen, was eigentlich viel leichter einzu¬ 
tippen ist. Sie sehen, gute Programmierung ist fast immer 
auch klarer und logischer. 

—► 500 DATA MAX,31.3-55,MORITZ,12.4.45, 

. HANS,6.2.60 

600 DATA MARIA,14.7.63,LUISE,8.9.60 

Mit dieser Anordnung haben wir noch einen weiteren 
Vorteil erhalten. Das Programm, oder besser gesagt die 
Geburtstagskartei, kann ganz leicht erweitert werden. 


Einen neuen Namen samt Datum brauchen Sie nur durch 
Komma getrennt hinter die letzte Eintragung der DATA- 
Zeilen zu schreiben. 

Doch halt! Noch etwas fehlt: Die Zahl der Namen, die 
sich durch eine neue Eintragung natürlich erhöht, kommt ja 
im Programm auch vor, und zwar in unserem Fall als Ziffer 4 
in den Zeilen 20, 30 und 210. Um uns diese Zusatzarbeit 
ebenfalls zu erleichtern, geben wir dieser Zahl einen 
Variablen-Namen Z, definieren dieses Z ganz am Anfang 
und brauchen so bei jeder neuen Namenseintragung nur 
dieses Z um 1 erhöhen. 

Diese Zeilen sehen jetzt so aus: 

—*• 10 Z=4 

20 DIM N$(Z),D$(Z) 

30 FOR 1=0 T0 Z 
210 FOR 1=0 T0 Z 


FAZIT 

1. Hinter einem DIM-Befehl können mehrere Felder dimen¬ 
sioniert werden. Sie müssen lediglich durch ein Komma 
getrennt sein. 

2. Mit einem READ-Befehl können mehrere DATA-Werte 
gelesen werden. Auch diese müssen durch ein Komma 
voneinander getrennt werden. 

3. Es empfiehlt sich, einen Zahlenwert oder einen String, 
der mehrmals in einem Programm vorkommt, ganz am 
Anfang des Programms als numerische beziehungs¬ 
weise als Stringvariable zu definieren und im Programm 
dann nur einmal dieser Variablen den Wert zuzuweisen. 


Wir haben jetzt ein komplettes kleines Programm, des¬ 
sen zusammengewürfelte Zeilennummern ihm allerdings 
ein u..,'artiges Aussehen verleihen. 

Deswegen und wegen der vielen Änderungen während 
seiner Entstehung ist es im folgenden Listing 4 noch einmal 
komplett dargestellt. 


10 2=4 <075> 
20 DIM N$<2),D$(Z> <096> 
30 FOR 1=0 TO Z <245> 
40 READ N$(I),D$(I> <035> 
50 NEXT I <134> 
200 INPUT "NAME"iF$ <194> 
210 FOR 1=0 TO 2 <169> 
220 IF N$(I)=F$ THEN PRINT D$<I):GOTO 200 <246> 
230 NEXT I <058> 
240 PRINT "NAME IST NICHT IN DER LISTE <249> 
500 DATA MAX.31.3.55,MORITZ,12.4.45,HANS,6 

.2.60 <186> 
600 DATA MARIA,14.7.63,LUISE,8.9.60 <196> 


© 64’er 

Listing 4. Eine einfache Geburtstagsverwaltung 


LEKTION 20: 

Zweidimensionale Felder (Arrays) 


Hinter dieser Überschrift verbirgt sich eine Erweiterung des 
DIM-Befehls. 

- eindimensional ist eine Linie; sie hat nur in einer Rich¬ 
tung eine Ausdehnung 

- zweidimensional ist eine Fläche; sie hat eine Länge und 
eine Breite. 

Diese Betrachtungsweise kann auch auf Variablenfelder 
angewendet werden. 

Ich habe bei der ersten Erklärung des Begriffs »Feld« und 
»Feldvariable« den Vergleich mit einstöckigen Häusern in 
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einer Straße verwendet. Unser damaliges Beispiel könnte 
man in dieser Form aufmalen: 


Bewohner 

2 

3 

4 

5 

6 

Adresse 

T(0) 

T(1) 

T(2) 

T(3) 

T(4) 


Ein zweidimensionales Feld ist eine Tabelle, in der 
sowohl waagerecht wie senkrecht Eintragungen möglich 
sind: 

In unserem Beispiel sind das Häuser, die mehrere Stock¬ 
werke und pro Stockwerk verschiedene Bewohnerzahlen 
haben. Der Einfachheit halber gebe ich allen Häusern die¬ 
selbe Zahl von Stockwerken. 


Stockwerk 3 

T(0,3) 

T (1,3) 

T(2,3) 

T(3,3) 

T(4,3) 

2 

T(0,2) 

T(1,2) 

T(2,2) 

T(3,2) 

T(4,2) 

1 

T(0,1) 

T(1.1) 

T(2,1) 

T(3,1) 

T(4,1) 

0 

T(0,0) 

T(1.0) 

T(2,0) 

T(3,0) 

T(4,0) 

Hausnummer 

0 

1 

2 

3 

4 


Bei diesen Reihenhäusern habe ich nicht mehr die Zahl 
der Bewohner in die Häuser beziehungsweise Stockwerke 
geschrieben, sondern die »Adressen«, die wieder unsere 
Feldvariablen sind. Nur haben sie diesmal zwei Indizes, 
einen für das Stockwerk (Zeile des Feldes) und einen für die 
Hausnummer (Spalte des Feldes). 

Wenn wir jetzt sagen wollen, daß im 3. Stock des 1. Hau¬ 
ses 7 Leute wohnen, legen wir das fest mit: 

—► T(l,3)=7 

Bei der Definition einer zweidimensionalen Variablen 
T(A,B) reserviert auch diesmal wieder der Computer ein 
Feld von 11 Variablen, allerdings pro Index, das heißt insge¬ 
samt 11*11=121 Plätze. 

Ein kleines Programm beweist diese Behauptung: 

—► 10 FOR 1=0 TO 10 
20 FOR K=0 TO 10 
30 T(I,K)=I+K 

40 PRINT T(I,K); 

50 NEXT K 
60 NEXT I 

Ich habe es extra so geschrieben, daß Sie die beiden 
Schleifen besser sehen können. Pro Durchlauf der äußeren 
I-Schleife läuft die innere K-Schleife llmal durch. Dement¬ 
sprechend sieht das Resultat der Zeile 40 aus. 

Wenn Sie jetzt die obere Grenze von I auf 11 erhöhen, 
merkt das Programm erst nach dem 121.Durchlauf, daß 
zuwenig Platz reserviert worden ist. Lassen Sie dagegen 
das I auf maximal 10, erhöhen aber das K auf 11, bleibt das 
Programm schon nach dem ersten Durchlauf der inneren 
Schleife stehen. 

Das war eine kleine Erinnerung an die Wirkungsweise 
geschachtelter Schleifen. 

Wenn wir ein größeres Feld benötigen, müssen wir die¬ 
sen Bedarf wieder mit dem DIM-Befehl eingeben: 

DIM T(25,34) 


Um die Wirkungsweise eines zweidimensionalen Feldes 
vorzuführen, habe ich vor, mit Ihnen einen »Karteikasten« 
zu entwickeln, in dem Sie eine Literatursammlung, 
Geschichtsdaten, Personal unterlagen oder alle Titel Ihrer 
Plattensammlung katalogisieren können. Eine Kartei ist 
natürlich nur dann sinnvoll, wenn bestimmte Eintragungen 
schnell durch Angabe eines Stichwortes gefunden werden 
können. 

Ich selbst habe mir für meine Arbeiten eine Computer- 
Literatursammlung zugelegt, deren Struktur ich hier ver¬ 
wenden will. Von jedem interessanten Artikel oder Buch¬ 
kapitel mache ich folgende Eintragung: 

- Zeitschrift (oder Buch) 

- Titel des Aufsatzes 

- Sachgebiet 

- Datum der Veröffentlichung 

- Seitennummer 

- Computer-Typ 

Diese Eintragungen nenne ich DATENSATZ, jeder 
Datensatz enthält 6 KATEGORIEN. 

Diese sollen nun in einem zweidimensionalen Feld unter¬ 
gebracht werden. 


KATE¬ 

GORIE 

K=1 

K=2 

K=3 

K=4 

K=5 

K=6 

DATEN¬ 

SATZ 

ZEIT¬ 

SCHRIFT 

TITEL 

SACH¬ 

GEBIET 

DATUM 

SEITE 

COMPU¬ 

TERTYP 

D=1 

(1.1) 

(1.2) 

(1,3) 

(1,4) 

(15) 

(15) 

D=2 

(2,1) 

(2,2) 

(2,3) 

(2,4) 

(25) 

(2.6) 

D=3 

(3,1) 

(3,3) 

usw. 





Der erste Index »D« gibt also die Nummer des Datensat¬ 
zes an, der zweite Index »K« die jeweilige Kategorie. 

Um fürs erste einmal 100 Datensätze zu je 6 Kategorien 
eintragen zu können, dimensionieren wir ein Feld A$: 

110 DIM A$(100,6) 

Die ersten 5 Datensätze könnten zum Beispiel so aus- 
sehen: 

1002 DATA GAZETTE,SPEEDSCRIPT,UTILITY, 
1/84,12,64 

1003 DATA RUN,DER DIM-BEFEHL,BASIC,3/85,125,20 

1004 DATA 64ER,FILES,KURS,4/87,118,64 

1005 DATA CHIP,SCHLEIFEN,BASIC,11/83,134,20/64 

1006 DATA HAPPY,GARBAGE COLLECTION,KURS, 
4/87,20/64 

Diese Datensätze in DATA-Zeilen lesen wir mit den fol¬ 
genden Zeilen in das Feld A$: 

120 D=D+1 
130 FOR K=1 T0 6 
140 READ A$(D,K) 

150 

160 NEXT K 
170 GOTO 120 

Da wir nicht wissen können, wieviele Datensätze wirklich 
im Feld enthalten sind, muß die D-Schleife hochgezählt 
werden, während die K-Schleife fest von 1 bis 6 läuft, da ja 
die Anzahl der Kategorien mit 6 festliegt. 

Nun brauchen wir am Ende der Datensätze - ich lege es 
auf Zeile 2000 - eine Endmarkierung; sonst läuft der 
READ-Vorgang über. Ich wähle dafür den Klammeraffen 
»@«, dessen Auftreten wir in Zeile 150 abfragen: 

150 IF A$(D,K )="@" GOTO 210 
2000 DATA @ 

Ab Zeile 210 soll der Suchvorgang nach einem bestimm¬ 
ten Datensatz beginnen. Der Suchvorgang beginnt mit der 
Eingabe des Stichwortes S$. Es kann ein Sachgebiet sein, 


FAZIT 

1. Felder können auch mehrere Dimensionen haben. Eine 
zweidimensionale Feld-Variable hat 2 Indizes in der 
Klammer, die durch ein Komma getrennt sein müssen. 

2. Für eine mehrdimensionale Feld-Variable werden pro 
Index 11 Plätze im Speicher reserviert. 

3. Zur Dimensionierung größerer Felder steht der DIM- 
Befehl, ebenfalls mit 2 Indizes, zur Verfügung. 

4. Für mehrdimensionale DIM-Befehle und Feld-Variable 
gelten dieselben Regeln wie für eindimensionale Felder. 
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eine Zeitschrift oder ein bestimmter Titel, den Sie suchen. 
Auf alle Fälle soll das Programm alle Datensätze, die das 
Stichwort enthalten, ausdrucken. 

210 INPUT "STICHWORT ";S$ 

220 FOR S=1 TO D 
230 FOR K=1 TO 6 

240 IF A$(S,K)=S$ THEN FOR Z=1 TO 6:PRINT A$ 
(S,Z):NEXT Z 
250 NEXT K 
260 

270 NEXT S 

280 PRINT "ENDE DER SUCHE" 

Um alle Datensätze, die im Feld A$ stehen, nach dem 
Stichwort S$ abzusuchen, bilden wir zwei verschachtelte 
Schleifen. Die eine zählt die Datensätze von 1 bis zum letz¬ 
ten Datensatz, dessen Nummer vom Einlesevorgang her 
noch auf dem Wert D steht. Für diese Schleife wähle ich die 
Variable S. Die andere Schleife zählt wieder die Kategorien 
K von 1 bis 6 (Zeilen 220 und 230). 

In Zeile 240 wird pro Schritt geprüft, ob die Feldeintra¬ 
gung mit dem Stichwort S$ übereinstimmt. 

Stimmt sie überein, dann soll der ganze Datensatz, in 
dem das Stichwort gefunden worden ist, ausgedruckt wer¬ 
den. Deswegen legen wir hinter das THEN sofort eine 
Sechserschleife zum Ausdrucken aller 6 Kategorien. 

Danach wird die Suche mit den K- und S-Schleifen fort¬ 
gesetzt, denn das Stichwort kann ja auch in nachfolgenden 
Datensätzen Vorkommen. 

Wenn Sie dieses Programmfragment laufen lassen, wird 
es aussteigen mit der Fehlermeldung »NEXT WITHOUT 
FOR«. 

Der Fehler, der hier auftritt, ist so häufig und doch so 
schwer zu sehen, daß ich ihn extra hier eingebaut habe, um 
Sie daraufzustoßen. jMan or 

Wir haben in den Zeilen 120 bis 150 eine Schleife mit der 
Variablen K für die 6 Kategorien. Dasselbe wiederholen wir 
in den Zeilen 230 bis 250. Und genau das geht schief, weil 
wir nämlich aus der ersten K-Schleife in Zeile 150 heraus¬ 
springen, ohne daß die Schleife zu Ende gelaufen ist. Im 
Speicher des Computers steht also noch eine Schleifenva¬ 
riable K auf einem bestimmten Wert, wenn wir in Zeile 230 
eine neue K-Schleife anfangen. Das kann der Computer 
nicht verarbeiten. 

Wir zählen übrigens die 6 Kategorien noch einmal in der 
Zeile 240, nur da macht es nichts, denn wir haben eine 
andere Schleifenvariable, nämlich Z verwendet. 

Das ist also schon eine der möglichen Lösungen, näm¬ 
lich eine Schleifenvariable immer nur einmal zu verwen¬ 
den. Die sauberste Lösung ist aber, nach dem Aussprung 
die Schleife »künstlich« zum Ende zu bringen und das wol¬ 
len wir in Zeile 150 auch machen. Verbessern Sie bitte: 

150 IF A$(D,K)="@"THEN K=6:NEXT K:G0T0 210 

Wir setzten also die Schleifenvariable K auf ihren End¬ 
wert 6 und geben ein letztes NEXT K. Damit wird die 
Schleife »geschlossen« und wir dürfen ungestraft K als 
Schleifenvariable wiederverwenden. 

Jetzt bleibt nur noch die Frage an den Benutzer, ob der 
Programmlauf wiederholt oder abgebrochen werden soll 
(Zeilen 310 bis 340). Das komplette Programm steht in 
Listing 5. 

Diese »Kartei« kann durch Eintippen von zusätzlichen 
DATA-Zeilen beliebig vergrößert werden. Soll sie mehr als 
100 Datensätze enthalten, dann muß in Zeile 110 das Feld 
entsprechend vergrößert dimensioniert werden. Letztlich 
ist das Programm nur begrenzt durch den verfügbaren 
Speicher des C64. 

Das zweidimensionale Feld mit Variablen steht also im 
Speicher des C64 gespeichert. Wenn wir den Computer 
ausschalten, wird der Speicher gelöscht und alles ist weg. 


100 REM**** DATEN INS FELD LESEN **** <071> 

105 : <081> 

110 DIM A$(100,6 > <230> 

120 D=D+1 <003> 

130 FOR K=1 TO 6 <119> 

140 READ A$(D,K) <191> 

150 IF A$(D,K)="@"THEN K=6:NEXT lOGOTO 210 <171> 
160 NEXT K <004> 

170 GOTO 120 <130> 

195 = <171> 

200 REM**** SUCHVORGANG ***** <020> 

205 : <181> 

210 INPUT "STICHWORT •';S$ <148> 

220 FOR S=1 TO D <024> 

230 FOR K=1 TO 6 <219> 

240 IF A$<S,K> =S$ THEN FOR Z=1 TO 6:PRINT 

A$<S.Z):NEXT Z <162> 

250 NEXT K <094> 

260 PRINT <108> 

270 NEXT S <180> 

280 PRINT"ENDE DER SUCHE" <165> 

295 : <017> 

300 REM**** WIEDERHOLUNG ODER ENDE **** <101> 

305 : <027> 

310 PRINT"NOCH EINMAL <J/N)7" <064> 

320 GET V$:IF V$ ="" THEN 320 <182> 

330 IF VS="J" THEN 210 <054:- 

340 END <088> 

999 : <213> 

1000 REM**** DATENSAETZE ***** <166> 

1001 : <215> 

1002 DATA GAZETTE.SPEEDSCRIPT,UTILITY,1/84 

.12,64 <001> 

1003 DATA RUN,DIM,BASIC,3/58,125,20 <044> 

1004 DATA 64ER,FILES,KURS,4/87,118,64 <145> 

1005 DATA CHIP,SCHLEIFEN,BASIC,11/83.134,2 

0/64 <066> 

1006 DATA HAPPY.GARBAGE COLLECTION,KURS,4/ ’ 

87,38,20/64 <082> 

10000 DATA @ <110> 


© 64'er 

List!- j 5. Zweidimensionales Feld 


Es wäre deshalb schön, wenn wir das Feld mit den Daten 
auch auf ein Band oder auf eine Diskette abspeichern 
könnten, um es bei einer späteren Gelegenheit wieder in 
den Computer holen zu können. 

Aus dem Betriebshandbuch von Commodore kennen 
Sie sicher die Speicher- und Ladebefehle SAVE, LOAD für 
Kassetten und Disketten. Ich sage es aber besser gleich, 
bevor Sie unnütz experimentieren: Diese Befehle spei¬ 
chern und laden leider nur Programme, nicht aber Varia¬ 
blenwerte, die im Lauf eines Programms erst erzeugt wer¬ 
den. 

Es gibt aber noch eine andere Methode, wie man Varia¬ 
blenwerte, sei es für numerische, sei es für Feldvariable, 
speichern kann. Dazu aber muß ich Ihnen erst in Lektion 21 
ein bißchen mehr über den Speicher des C64 erklären. 
Speichern Sie bitte das Fragment Listing 5 auf Band oder 
Diskette ab, wir werden es später vervollständigen. 


FAZIT 

1. Schleifen, die durch Aussprung verlassen werden, 
bevor sie zu Ende gelaufen sind, werden im Speicher 
des Computers als »noch offen« registriert. Ihre Schlei¬ 
fenvariable kann daher nicht wiederverwendet werden. 

2. Entweder muß man die Wiederverwendung von Schlei¬ 
fenvariablen vermeiden oder muß verlassene Schleifen 
schließen durch Zuweisung der Variablen auf den vorge¬ 
sehenen Endwert plus nachfolgendem NEXT-Befehl. 

3. Zweidimensionale Felder werden durch zwei ver¬ 
schachtelte Schleifen abgearbeitet. 

4. Felder beziehungsweise die Werte der Feldvariablen 
können nicht mit SAVE auf Kassette oder Diskette 
gespeichert werden. 
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Der nun folgende Abschnitt hat nur indirekt etwas mit 
Basic zu tun. Aber wie ganz am Anfang betont, komme ich 
ohne einige Beschreibungen von Eigenschaften oder bes¬ 
ser gesagt von Eigenheiten des C64 nicht aus. Einige 
Kenntnisse des Innenlebens des Computers gehören halt 
doch auch zum Programmieren. 

FAZIT: 

1. Schleifen, die durch Aussprung verlassen «werden, 
bevor sie zu Ende durchgelaufen sind, werden im Spei¬ 
cher des Computers als »noch offen« registriert. Ihre 
Schleifenvariablen können daher nicht weiterverwendet 
werden. 

2. Entweder muß man die Wiederverwendung von Schlei¬ 
fenvariablen vermeiden, oder muß verlassene Schleifen 
schließen durch Zuweisung der Variable auf den vorge¬ 
sehenen Endwert des nachfolgenden NEXT-Befehls. 

3. Zweidimensionale Felder werden durch zwei ineinan¬ 
dergeschachtelte Schleifen abgearbeitet. 

4. Feldvariable können nicht mit SAVE auf Kassette oder 
Diskette gespeichert werden. 

Unsere Kartei konnte durch Einfügen von zusätzlichen 
DATA-Zeilen beliebig vergrößert werden. Soll es mehr als 
100 Datensätze enthalten, dann muß in Zeile 110 das Feld 
entsprechend größer dimensioniert werden. Letztlich ist 
das Progamm nur begrenzt durch den Speicherplatz im 
C64. 


LEKTION 21: Der Speicher - 
das Gedächtnis des Computers 


Alle Computer - Großrechenanlagen genauso wie kleine 
Heimcomputer - sind aus den folgenden Grundbausteinen 
aufgebaut: 

- zentrale Recheneinheit, auch Mikroprozessor oder CPU 

(Central Prozessing Unit) genannt 

- Speichereinheit 

- Ein- und Ausgabe-Bausteine 

Während die CPU rechnet, alle Vorgänge im Computer 
steuert, Befehle ausführt und somit das eigentliche Herz 
des Computers darstellt, braucht man die Ein- und 
Ausgabe-Bausteine, um Daten in den Computer hinein¬ 
beziehungsweise herauszuleiten. Alle Anschlüsse von 
Datasette, Diskettenlaufwerk, Drucker und Bildschirm wer¬ 
den von ihnen gesteuert. 

Der Speicher ist der Notizblock des Computers. In ihm 
steht alles, was er.sioh merken soll: Programmzeilen, Varia¬ 
blenwerte, Zeichenketten (Strings) und so weiter. Auf eng¬ 
lisch heißt Speicher passenderweise Memory, was wir wie¬ 
derum auf deutsch mit Gedächtnis übersetzen könnten. 

Jeder Computer hat zwei Arten von Speicher: 

Das RAM (Random Access Memory) ist ein aus elektroni¬ 
schen Bauteilen aufgebauter Speicher, der für Programme 
frei verfügbar ist. Wir können in diesen Speichertyp Daten 
hineinschreiben und sie wieder herauslesen, ohne sie zu 
zerstören. Nur nach dem Ausschaiten des Computers - da 
sind sie weg! 

Das passiert auch dann, wenn nur kurzzeitig der Strom 
ausfällt, etwa bei einem Gewitter oder wenn der Netz¬ 
stecker einen Wackelkontakt hat. 

Es ist deshalb ratsam, bei längeren Programmierarbei¬ 
ten Zwischenergebnisse, das heißt den jeweiligen Inhalt 
des RAM auf Kassette oder Diskette abzuspeichern, denn 
nur dort sind sie dauerhaft sicher. 

Das ROM (Read Only Memory) ist nicht frei verfügbar. Es 
besteht zwar auch aus elektronischen Bauteilen, aber sein 
Inhalt ist fest »eingebrannt« - man kann ihn nicht ändern. 


Er wird vom Computer selbst verwendet. Wenn Sie zum 
Beispiel Ihren C64 einschalten, dann läuft eine im ROM 
eingespeicherte Folge von Programmschritten ab, die 
schließlich mit der Meldung des Computers auf dem Bild¬ 
schirm endet, mit der er sich bereit (READY) meldet. Im 
ROM stehen nicht nur die Programmschritte, die den 
Betrieb des Computers steuern, sondern auch das Pro¬ 
gramm, welches alle Basic-Befehle in einen Code »über¬ 
setzt«, den der zentrale Mikroprozessor (CPU) versteht. 
Wenn Sie mehr über die allgemeine Arbeitsweise des Com¬ 
puters erfahren wollen, dann lesen Sie bitte im 64er Son¬ 
derheft 16 ab Seite 16 nach. 


21.1. Die Adressen der Speicherzellen 

Der gesamte Speicher des C64 ist aus einzelnen Spei¬ 
cherzellen aufgebaut. Der C64 bietet Platz für 65536 Spei¬ 
cherzellen. Jede dieser Speicherzellen hat eine Nummer, 
von 0 bis 65535. 

Diese Nummern nennen wir Adressen. Um eine Zahl 
oder ein Zeichen in eine bestimmte Speicherzelle hinein¬ 
schreiben zu können, müssen wir ihre Adresse kennen. 
Natürlich gilt dasselbe für das Auslesen. Es liegt deshalb 
sehr nahe, uns ein »Adreßbuch« des Speichers zu beschaf¬ 
fen. - 

Im Betriebshandbuch ist eine derartige Liste im Anhang 
auf den Seiten 160 bis 165 unter dem Titel »Speicherbele¬ 
gung« angegeben. Diese Liste ist aber alles andere als klar 
und verständlich. In dem folgenden Absatz habe jch daher 
eine andere Darstellung gewählt, die Ihnen eine Übersicht 
über die verschiedenen Speicherbereiche und ihre Bedeu¬ 
tung geben soll. Aber ein Adreßbuch, oder wie es auf eng¬ 
lisch heißt, eine »Memory Map« ist das eigentlich auch 
nicht. Dozu müßte ich ja jede einzelne Adresse beschrei¬ 
ben. 

Hier ist also eine Kurzfassung eines Adreßbuches, in der 
wir aber bereits viel sehen können: 

- Der Speicher beginnt ganz unten bei Adresse 0. 

- Die ersten 2047 RAM-Speicherzellen sind vom Computer 
selbst belegt. 

- Ab Adresse 2048 beginnt der RAM-Speicher für Basic- 
Programme. Ab hier werden alle eingegebenen oder von 
Band und Diskette geladenen Programme gespeichert. 
Auch alle Variablen, Felder und Zeichenketten, die im 
Lauf eines Programmes auftauchen, werden dort gespei¬ 
chert. 

- Dieser Speicherbereich endet bei Adresse 40959. 

Dem Programmierer stehen 38911 Speicherplätze zur 

Verfügung. Alle diese Speicherzellen sind also RAM- 
Zellen, das heißt, man kann Daten hineinschreiben und 
herauslesen. 

-Von 40960 bis 49151 sind die fest vorgegebenen Pro¬ 
gramme zum Übersetzen von Basic in den Maschinen¬ 
code enthalten 

- Anschließend an 53248 bis 57343 sind alle Buchstaben 
und Zeichen und die Ein- und Ausgabeprogramme 
gespeichert. 

- Danach folgen die Programme des Betriebssystems, 
auch Kernel genannt. 

Bemerkenswert ist, daß die Betriebsprogramme des 
Computers (Basic-Übersetzer, Zeichensatz, Ein- und Aus¬ 
gabe und Kernel) in einem ROM-Speicher untergebracht 
sind, der über einem RAM-Speicher sitzt. Das heißt, sie 
haben dieselben Adressen. Wie dieser RAM-Teil des Spei¬ 
chers genutzt werden kann, gehört zur höheren Program¬ 
mierkunst und wird hier nicht behandelt. 

Uns stellt sich als nächstes die Frage, wie wir Daten in 
einzelne Speicherzellen des Programmspeichers hinein¬ 
schreiben und herauslesen können. 
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21.2. Im Speicher stöbern 

Basic hat zwei Befehle, mit deren Hilfe der Speicher 
abgefragt werden kann. 

Während der Lese-Befehl völlig ungefährlich ist - er 
»kopiert« praktisch den Inhalt der Speicherzelle und läßt 
das Original unverändert - kann der Schreib-Befehl gefähr¬ 
lich sein. Ich will Sie gleich zu Beginn davor warnen, ihn 
unbedacht einzusetzen - er verändert den Inhalt einer 
Speicherzelle, und über die Folgen dieser Veränderung für 
ein Programm oder für den Betrieb des Computers muß 
man sich im klaren sein. 

Der Schreib-Befehl heißt 

POKE 

was das englische Wort für »hineinstochern« ist (nomen est 
omen). Nach dem Befehlswort muß die Adresse der Spei¬ 
cherzelle stehen, danach folgt, durch ein Komma getrennt, 
die Zahl, die hineingeschrieben werden soll. 

Der Befehl 

POKE 14000,55 

schreibt also die Zahl 55 in die Speicherzelle 14000. 


Basic-Befehl Nr. 27 POKE 

- er wird in der folgenden Weise geschrieben: 

POKE Adresse,Wert 

Adresse und Wert müssen durch ein Komma voneinander 
getrennt sein 

- der POKE-Befehl speichert den »Wert« in der mit 
»Adresse« bezeichneten Speicherzelle ab. Er über¬ 
schreibt dabei einen dort gespeicherten früheren Wert 

- gültige »Werte« liegen im Bereich von minimal 0 bis maxi¬ 
mal 255. Wird dieser Bereich überschritten, erscheint die 
Fehlermeldung ILLEGAL QUANTITY ERROR. 

- der erlaubte Bereich für »Adresse« reicht von 0 bis 65535. 
Ein Überschreiten wird mit der Fehlermeldung ILLEGAL 
QUANTITY ERROR bestraft. 


Der Lese-Befehl heißt 

PEEK 

das ist das englische Wort für »hineinschauen«. Hinter die¬ 
sem Befehlswort steht die Adresse - und zwar in Klam¬ 
mern! - deren Inhalt gelesen werden soll. 

Die Befehlsfolge: 

A=PEEK(14000):PRINT A 
oder noch kürzer 

PRINT PEEK(14000) 

liest den Inhalt der Speicherzelle 14000 und druckt ihn auf 
den Bildschirm. 

In der ersten Zeile wird der Inhalt der Variablen A zuge¬ 
ordnet und steht unter diesem Namen im Speicher für spä¬ 
tere Verwendung. Da der Inhalt aber trotz PEEKen in der 
Zelle 14000 stehenbleibt und von dort immer wieder her¬ 
ausgeholt werden kann, bietet sich die Kurzform der zwei¬ 
ten Zeile an, die direkt das PEEK-Ergebnis ausdruckt. 


10 F0R 1=13900 T0 14200 

20 PRINT I,PEEK(I) 

30 NEXT I 

schauen wir uns den Speicherbereich von 13900 bis 14200 
an. Es wird durch Zeile 20 der jeweilige Wert von I und da¬ 
neben die Zahl, die in der Adresse I gespeichert ist, mit nur 
einem PRINT-Befehl ausgedruckt. Das Komma zwischen 
den beiden bewirkt einen Abstand von einer Viertelzeilen¬ 
länge. 

Nach RUN sehen wir, daß in allen Speicherzellen entwe¬ 
der eine 0 oder 255 steht, mit Ausnahme der Zelle 14000, 
da steht brav unsere 55. 

Übrigens hoffe ich, Sie wissen, daß mit der CTRL-Taste 
links oben der Ablauf des Programms gebremst werden 
kann - zum besseren Überblick, wenn die Speicherzelle 
14000 vorbeisaust. In diesem Teil des Speichers steht also 
praktisch gar nichts. Das ist auch kein Wunder, denn wir 
tummeln uns ja im oberen Teil des RAM-Speichers, der uns 
für Basic-Programme zur Verfügung steht. Unser Mini- 
Programm von 3 Zeilen, welches ab der Speicherzelle 2048 
gespeichert wird, reicht da natürlich bei weitem nicht hin. 
Wenn Sie Zeile 10 so abändern, daß der Ausdruck ab dem 
Speicheranfang 2048 beginnt: 

10 F0R 1=2048 T0 2200 

dann sehen wir in der Tat ein Durcheinander von Zahlen, 
die bis hin zur Adresse 2095 reichen. Das ist - in einem 
besonderen Code geschrieben - unser Programm. 
Danach kommen wieder die Leerserien mit 0 und 255. 

Schauen wir spaßeshalber noch in den obersten Teil des 
Speichers, wo laut Speicherbild die mysteriösen Register 
für Ein- und Ausgabe liegen. Ich wähle Speicherzelle 
53265 als Versuchskaninchen. 

PRINT PEEK (53265) 

Das ergibt eine 155. 

Jetzt machen wir ein Experiment - das, wie gesagt, uner¬ 
wünschte Folgen haben kann. Wir ändern mutwillig den 
Inhalt dieser Speicherzelle mit: 

POKE 53265,16 

Und siehe da, nach Drücken der RETURN-Taste ver¬ 
schiebt sich der obere Rand des Bildschirms und schneidet 
alle Zeichen in der ersten Zeile ab. Sie sind zwar noch da, 
aber nicht sichtbar. 

Der Originalzustand läßt sich mit dem oben ermittelten 
»Normalwert« wiederherstellen, indem Sie eintippen: 

POKE 53265,155 

Dieser Versuch ist gutgegangen. Aber wenn Sie statt der 
15 oder der 155 die Zahl 33 in die Zelle POKEn: 

POKE 53265,33 

dann geht es schief. Der Bildschirm wird leer und durch 
nichts läßt er sich wiederbeleben - der Computer ist »abge¬ 
stürzt«! 

Ein Mittel bleibt uns doch, nämlich die <STOP 
RESTORE > -Tastenkombination. 


Basic-Befehl Nr. 28 PEEK 

- er wird in der folgenden Weise geschrieben: 

PEEK (Adresse) 

- die »Adresse« muß immer in Klammern stehen 

- der Befehl liest den Inhalt der durch die »Adresse« ange¬ 
gebenen Speicherzelle 

- der erlaubte Bereich von »Adresse« reicht von 0 bis 

65635. Wird er überschritten, meldet dies der Computer 
mit ILLEGAL QUANTITY ERROR_ 

Wir haben gerade vorhin mit dem POKE-Befehl die 
Zahl 55 in die Speicherzelle 14000 hineingeschrieben und 
sie danach mit PEEK wieder ausgelesen. 

Nun, das beweist natürlich noch gar nichts. Schauen wir 
also mal im Speicher rund um die Zelle 14000 nach, was da 
so drin steht. Mit den Programmzeilen: 


FAZIT 

1. Der POKE-Befehl ist nützlich und gefährlich zugleich. 

2. Wird eine bestimmte Zahl in eine Speicherzelle ge- 
POKEt, mit der der Computer seine eigenen Abläufe 
steuert (Bereiche 0 bis 2047,40960 bis 49152 und 53248 
bis 65535), kann dadurch der Ablauf beeinflußt werden. 
Es kann aber auch zum »Absturz« des Computers kom¬ 
men. 

3. Mit »Absturz« wird beim Computer der Zustand bezeich¬ 
net, in dem kein Programm mehr läuft und der Computer 
auf keine normalen Steuertasten mehr reagiert. 

4. Ein abgestürzter Computer kann nur durch Aus- und 
Wiedereinschalten wieder in Gang gesetzt werden. 
Nach dem Aus- und Einschalten befindet sich der Com- 
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puter im Anfangszustand, das heißt, ein Programm, das 
vorher im Arbeitsspeicher war, ist verloren. 

5. Es ist empfehlenswert, bevor ein POKE-Befehl ausge¬ 
führt wird, sei es im Direkt-Modus oder sei es innerhalb 
eines Programms, ein im Arbeitsspeicher befindliches 
Programm zuerst auf Band oder Diskette abzuspei¬ 
chern - für alle Fälle ! 


21.3. Wir POKEn noch ein Weilchen 

Es gibt keine Computerzeitschrift, die nicht unter der 
Rubrik Tips und Tricks alle möglichen POKE-Adressen 
angibt, mit denen sich verblüffende Effekte erzielen lassen. 
Auch ich gebe Ihnen ein paar Hinweise. 

POKE 199,1:PRINT "ABCDE* 

druckt alle Zeichen dieser Programmzeile revers (inver¬ 
tiert). 

POKE 650,64 

schaltet die Wiederholfunktion aller Tasten aus 

POKE 650,0 

nur die Leer-, INST/DEL- und alle Cursor-Tasten wiederho¬ 
len, solange sie gedrückt werden 

POKE 650,128 

alle Tasten haben Wiederholfunktion (Normalzustand) 

POKE 53281,4 

schaltet die Farbe des Bildschirm-Hintergrundes auf Violett 

POKE 53280,5 

schaltet die Farbe des Bildschirm-Rahmens auf Grün. 

Die beiden letzten POKE-Adressen 53281 und 53280 
wollen wir uns näher anschauen. 

Der Zahlenwert in der Speicherzelle 53281 bestimmt 
also die Hintergrundfarbe, während in Speicherzelle 53280 
die Rahmenfarbe festgelegt ist. Da nach einem POKE- 
Befehl Zahlen von 0 bis 255 zugelassen sind, ist es sicher 
ganz interessant, welche Zahl welche Farbe hervorruft. Ein 
kleines Programm gibt uns darüber Auskunft: 

10 F0R 1=0 T0 255 
20 POKE 53281,1 
30 PRINT I 

40 GET A$:IF A$="" THEN 40 
50 NEXT I 

Zwischen den Zeilen 10 und 50 wird in einer Schleife die 
Variable I von 0 bis 255 hochgezählt. 

Der jeweilige Wert von I wird in Zeile 20 in die Speicher¬ 
zelle 53281 gePOKEt und ändert dadurch die Hintergrund¬ 
farbe. 

Um die Zugehörigkeit der Farben zu den Zahlen zu 
sehen, wird in Zeile 30 der jeweilige Wert von I ausge¬ 
druckt. 

Zeile 40 dient dazu, die Schleife schrittweise weiterzu¬ 
schalten. Der GET-Befehl in dieser Zeile springt so lange 
auf seine eigene Zeilennummer zurück, bis irgendeine 
beliebige Taste gedrückt wird. Erst dann kommt der NEXT- 
Befehl in Zeile 50 zum Zuge. 

Mit diesem kleinen Programm werden pro Tastendruck 
alle Farben durchgeleiert, wobei die jeweils unterste ausge¬ 
druckte Zahl dem Farbwert entspricht. 

Was wir vorher mit der Speicherzelle 53281 für die Hin¬ 
tergrundfarbe gemacht haben, können wir ebenso mit der 
Zelle 53280 für die Umrandung machen. Diese beiden 
Adressen gehören zu den »Registern« des VIC-Bausteins, 
der für Töne und Graphik zuständig ist. 

FAZIT 

1. Ein REGISTER ist eine Speicherzelle im Mikroprozes¬ 
sor (CPU) oder in einem anderen elektronischen Bau¬ 
stein. Im C64 besteht ein Register aus 8 Bit, das ist 1 
Byte. 


2. In einem Register werden Daten gespeichert, welche 
den Ablauf von arithmetischen, logischen oder von 
Steueroperationen festlegen. 

3. Der Inhalt von Registern kann mit PEEK ausgelesen 
und, was viel wichtiger ist, mit POKE verändert werden. 

Jetzt kennen wir also die beiden Farbregister und wis¬ 
sen, wie wir die Farben des Bildschirms unseren Wün¬ 
schen anpassen können. 

LEKTION 22: 

Der Bildschirmspeicher und Fnrbspeidier 


Ich möchte Sie gern noch ein bißchen länger mit dem Spei¬ 
cher beschäftigen. Schauen Sie sich bitte nochmal das 
Speicherbild an. Da sehen wir ab Adresse 1024 das 
»Bildschirm-RAM«. 

Um zu demonstrieren, was das ist, zeige ich Ihnen ein 
kleines Experiment: 

- Löschen Sie den Bildschirm mit der CLEAR-Taste 

- Fahren Sie mit dem Cursor in die untere Hälfte des Bild¬ 
schirms. 

- Geben Sie direkt ein: 

POKE 1024,1 

Ganz links oben auf dem Bildschirm steht plötzlich ein A. 
Wenn Sie aus der 1 eine 2 machen und den Befehl wieder¬ 
holen, verwandelt sich das A in ein B. 

Und noch ein Versuch: ändern Sie 1024,2 in 1025,3 um 
und geben es ein. Jetzt steht neben dem B ein C. 

Die Zahl 1 erzeugt also ein A, 2 ein B und 3 ein C. Dann 
müßte eigentlich die 26 ein Z hervorrufen - was sie auch tut. 

W' r laben also einen neuen Code für die Zeichen auf 
dem Bildschirm gefunden. 

Ein ähnlicher Zusammenhang deutet sich an bei den 
Adressen: 1024 setzt den Buchstaben an den ersten Platz 
des Bildschirmes, 1025 an den zweiten. Der Bildschirm hat 
40 Stellen pro Zeile und das für 25 Zeilen. Das macht insge¬ 
samt 1000 Plätze auf dem Bildschirm. 

Daher müßte die Adresse 2023 einen Buchstaben ganz 
rechts unten plazieren. 

POKE 2023,26 

setzt ein Z genau dorthin, wie vorhergesagt. 

Ich will Sie nicht länger plagen und das alles zusammen¬ 
fassen: 


FAZIT 

1. Der Elektronenstrahl, der mit großer Geschwindigkeit 
über den Bildschirm des Fernsehers oder des Monitors 
flitzt und dort Bilder oder Text hinmalt, hat kein Gedächt¬ 
nis. Deswegen muß der Computer alle Angaben, die der 
Elektronenstrahl braucht, in einem gesonderten Spei¬ 
cher festhalten, der deshalb »Bildschirmspeicher« 
heißt. 

2. Im Bildschirmspeicher sind alle Zeichen gespeichert, 
die zum jeweiligen Zeitpunkt auf dem Bildschirm 
erscheinen. 

3. Für den Bildschirmspeicher sind im RAM die Speicher¬ 
zellen 1024 bis 2047 reseviert. Da auf dem Bildschirm 
des C64 genau 1000 Plätze vorhanden sind (40 Stellen 
mal 25 Zeilen), reicht der Bildschirmspeicher nur bis 
Adresse 2123. Die restlichen 24 Byte sind frei. 

4. Alle Zeichen und Buchstaben stehen im Bildschirmspei¬ 
cher mit einem speziellen Code, der im Bedienungs¬ 
handbuch auf den Seiten 133 und 134 aufgelistet und 
auf Seite 132 erklärt ist. Der Bildschirmcode hat nichts 
mit dem ASCII-Code zu tun. 
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Durch direktes POKEn von Bildschirm-Codewerten in 
den Bildschirmspeicher lassen sich Effekte erzielen, die 
mit dem PRINT-Befehl nur sehr umständlich möglich 
wären. Ich will Ihnen das an einem Beispiel zeigen. 

Ziel des Experiments soll es sein, eine bewegte farbige 
Umrandung des Bildschirms zu erzeugen, die als Pro¬ 
grammteil in anderen Programmen verwendbar ist. Ich ver¬ 
wende dazu ein Beispiel aus dem Buch »VC 20 Spielebuch« 
von A.Dripke, das viele gute Ideen und Anleitungen enthält. 
Wie üblich gehe ich in Stufen vor. 

—*• 10 FOR 1=0 TO 999 
20 POKE 1024+1,42 
30 NEXT 

Diese drei Zeilen zählen vom Anfang des Bildschirmspei¬ 
chers (1024) 1000 Plätze hoch (von 0 bis 999) und POKEn 
in jeden Platz einen Stern. Der Bildschirmcode des Sternes 
ist 42 (siehe oben erwähnte Tabelle). 

Auffallend bei diesem eindrucksvollen Vorgang ist, daß 
der Cursor und die READY-Meldung nicht anschließend an 
den letzten Stern erscheint, sondern dort, wo der letzte 
Basic-Befehl - in unserem Fall das RUN - auf den Bild¬ 
schirm geschrieben worden ist. 

Im nächsten Schritt lassen wir den Stern nur auf der 
obersten und untersten Zeile laufen. Die Schleife zählt 
daher jetzt nur bis 39 (Zeilenlänge): 

—► 10 FOR 1=0 TO 39 
20 POKE 1024+1,42 
30 POKE 1024+960+1,42 
40 NEXT I 

Neu ist hier die Zeile 30. Sie erhöht die Adresse um 
24*40=960 Plätze und beginnt dadurch in der untersten 
Zeile. 

Dieses Programm malt also eine Rahmenlinie oben und 
unten. Jetzt fehlt noch links und rechts. 

—► 50 FOR K=0 TO 960 STEP 40 
60 POKE 1024+K,42 
70 POKE 1024+39+K.42 
80 NEXT K 
90 GOTO 10 

Um von oben nach unten zu zählen, beginnen wir mit 0, 
gehen aber in 40er Schritten gleich an den Anfang der 
jeweils nächsten Zeile bis zum Anfang der letzten Zeile. 
Das gibt uns in Zeile 60 den linken Rand. 

Für die andere Seite benutzt die Zeile 70 die gleiche Zäh¬ 
lung, POKEt aber den Stern um 39 Plätze verschoben, also 
am rechten Rand. Ganz zum Schluß springen wir in Zeile 
90 auf den Anfang zurück, um das lästige READY zu ver- 


3 = lila 

4 = purpur 

5 = grün 

6 = blau 

7 = gelb 


11 = dunkelgrau 

12 = mittelgrau 

13 = hellgrün 

14 = hellblau 

15 = hellgrau 


FAZIT 

1. Im Farbspeicher sind alle Farben gespeichert, in wel¬ 
chem die Zeichen auf dem Bildschirm erscheinen. 

2. Für den Farbspeicher sind im RAM die Speicherzellen 
55296 bis 56319 reserviert. 

Da auf dem Bildschirm des C64 genau 1000 Plätze 
vorhanden sind (40 Stellen mal 25 Zeilen), reicht der 
Farbspeicher nur bis Adresse 55295. Die restlichen 24 
Bytes sind frei. 

3. Als Codewerte für die Farben gelten die Zahlen von 0 bis 
15. 

Wir wollten aber eigentlich das Umrahmungs-Programm 
mit Farben versehen. Dies erfolgt mit POKE in den Farb¬ 
speicher. 


an 


5 FOR F=0 TO 15 
10 FOR 1=0 TO 39 

20 POKE 1024+1,42:POKE 55296+1,F 
30 POKE 1024+960+1,42:POKE 55296+960+1,F 
40 NEXT I 

50 FOR K=0 TO 960 STEP 40 
60 POKE 1024+K,42:POKE 55296+K,F 
70 POKE 1024+39+K,42:POKE 55296+39+K.F 
80 NEXT K 
90 NEXT F 

ium 


Listing 6. Farbige Umrandung 


Ich habe folgendes gemacht: 

Die Zeilen 5 und 90 bilden die übergeordnete Schleife, 
innerhalb der wir die Farbe F in den Farbspeicher POKEn. 

Um sicherzustellen, daß die Farbe F in diejenigen Spei¬ 
cherzellen des Farbspeichers kommt, die denen des Bild¬ 
schirmspeichers entsprechen, habe ich an jeden Bild- 
schirm-POKE-Befehl ein POKE 55296 angehängt mit den¬ 
selben Argumenten. Nur hinter dem Komma steht ein F für 
die Farbe und nicht die 42 für den Stern. 

Sie sehen, die Arbeit des Ausrechnens der Adresse 


hindern. 

Jetzt wollen wir diese Umrandung bunt machen, und 
zwar nach jedem Umlauf in einer anderen Farbe. 

Auch hier bietet der Computer eine Lösung an. Zwischen 
den Adressen 55296 und 56319 liegt das »Farb-RAM«. 

Dieser Bereich im RAM ist der Zwilling zum Bildschirm¬ 
speicher, nur ist er für die Farben zuständig. 

Wenn wir jetzt das wiederholen, was wir gleich nach der 
Überschrift »Bildschirmspeicher« gemacht haben und 
POKEn zusätzlich in die erste Zelle des Farbspeichers 
2048 die Zahl 100, dann ändern wir die Farbe des Zeichens, 
also: 

—► - Bildschirm löschen 

- Cursor in die untere Hälfte 

- POKE 1024,1 

- POKE 55296,7 

Das A erscheint in Gelb. 

Insgesamt haben wir 16 Farben zur Verfügung. Sie ent¬ 
sprechen den folgenden Werten: 

0 = schwarz 8 = orange 

1 = weiß 9 = braun 

2 = rot 10 = hellrot 


braucht man nur einmal zu machen. 

Jetzt habe ich noch eine Variante vor: 

Die Umrandung soll nicht oben und unten beziehungs¬ 
weise links und rechts gleichzeitig laufen, sondern immer 
im Kreis. 

Bisher hatten wir diese Situation: 

Zeile 20: oben, von links nach rechts 
Zeile 30: unten, von links nach rechts 
Zeile 60: links, von oben nach unten 
Zeile 70: rechts, von oben nach unten. 

Wir müssen das so abändern: 

Zeile 20: oben, bleibt 
Zeile 70: rechts, bleibt 
Zeile 30: unten, von rechts nach links 
Zeile 60: links, von unten nach oben 
Die Reihenfolge ändert sich also, und die Zeilen 30 und 
60 laufen in der entgegengesetzten Richtung. Um das zu 
erreichen, müssen wir leider für jede POKE-Zeile eine 
eigene Schleife bauen. In den Zeilen 30 und 60 wird rück¬ 
wärts gezählt, mit negativem STEP. 

In der neuen Reihenfolge sieht das so aus (Vorsicht, 
neue Zeilennummern!): 
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5 F0R F=0 T0 15 

10 

F0R 1=0 T0 39 

20 

P0KE 1024+1,42:P0KE 55296+1,F 

30 

NEXT I 

40 

F0R K=0 T0 960 STEP 40 

50 

P0KE 1024+39+K,42:P0KE 55296+39+K.F 

60 

NEXT K 

70 

F0R 1=39 T0 0 STEP -1 

80 

P0KE 1024+960+1,42:P0KE 55296+960+1,F 

90 

NEXT I 

100 

F0R K=960 T0 0 STEP -40 

110 

P0KE 11024K,42:P0KE 55296+K,F 

120 

NEXT K 

135 

NEXT F 

140 

GOTO 5 

Listing 7. Umlaufende Umrandung 

LEKTION 23: Die Uhr des Computeis 


Der C64 hat eine innere Uhr eingebaut, deren Stand abge¬ 
fragt, ausgedruckt und somit zu Messungen und zur Pro¬ 
grammsteuerung eingesetzt werden kann. Diese Uhr star¬ 
tet beim Einschalten mit dem Stand 0 und läuft, bis sie 
durch einen entsprechenden Befehl auf Null oder auf irgend¬ 
einen anderen Wert gesetzt wird. Der aktuelle Stand die¬ 
ser Uhr kann mit der dafür fest reservierten Variablen 

TI 

abgefragt werden. Mit der ewigen Schleife: 

10 PRINT TI:GOTO 10 


TI$="221500" 

setzt die Uhr auf 22 Uhr 15. 

In dem Augenblick, wenn Sie nach diesen Befehlen die 
RETURN-Taste drücken, läuft die Uhr mit diesem neuen 
Anfangswert los. 


Basic-Variable TI, TIS 

- Beim Einschalten des Computers läuft ein interner Zähler 
los, der 60 mal in jeder Sekunde um 1 erhöht wird. Wenn 
der Zähler den Stand 5184000 erreicht hat - das ent¬ 
spricht einer Laufzeit von 24 Stunden, wird er auf 0 
zurückgesetzt. 

- Mit TI kann der Stand des Zählers abgefragt werden. 

- Die Variable Tl$ wandelt den Zahlenwert des Zählers in 
eine sechsstellige Zahl um, deren erste beiden Stellen die 
Stunden der Uhrzeit, die mittleren beiden die Minuten 
und die letzten beiden die Sekunden angeben. 

- Mit der Anweisung Tl$= "aabbcc" wird die interne Uhr 
auf aa Uhr bb Minuten cc Sekunden gestellt. 


Mit einer Simulation einer Stoppuhr wollen wir die bei 
den Variablen TI und Tl$ in einem Programm anwenden. 
Mit der Stoppuhr wollen wir den Vergleich der Laufzeiten 
der Zählschleife mit IF-THEN und der FOR-TO-NEXT- 
Schleife aus Lektion 8 wiederholen. 

23.1. Stoppuhr 

Unsere Stoppuhr läuft in dem Moment los, wo sie auf Null 
gesetzt wird: 

10 TI="000000' 

Sie stoppt mit der letzten Zeile der Messung: 

90 PRINT TI:END 


drucken wir ein laufendes Band von sich schnell ändern- Um die Meßzeit in Sekunden zu erhalten, wenden wir 
den Zahlen auf den Bildschirm. noch uoige Regel an, teilen durch 60 und drucken aus, was 

wir sehen werden. Zeile 90 wird verbessert zu: 

90 PRINT TI/60 "SEKUNDEN" 


Diese Zahl durch 60 geteilt gibt uns die Zeit seit dem Los¬ 
laufen (Einschalten) in Sekunden an, durch 3600 geteilt in 
Minuten und durch 216000 geteilt in Stunden. 



Weil diese Darstellung etwas mühsam ist, wenn man 
eine echte Zeitangabe braucht, besitzt Basic noch eine 
andere reservierte Variable 

Tl$ 

welche die Zeit in einer sechsstelligen Zahl ausdruckt. 
Dabei bedeutet 124533 12 Stunden, 45 Minuten und 33 
Sekunden. Dies testen wir mit 

10 PRINT TI$:G0T0 10 

Dieses Zahlenband verändert sich jetzt im Rhythmus 
von Sekunden. 

TIS ist auch die Variable, mit dem die Uhr auf einen belie¬ 
bigen Wert - auch auf Null - gesetzt wird: 


Zwischen 10 und 90 plazieren wir unser Testprogramm. 
Ich schlage vor, genau wie in Lektion 8 den Bildschirm mit 
375 A zu füllen. 


Testprogramm »Stoppuhr« 


ZÄH LER+GOTO 

FOR-TO-NEXT 

10 TI$="000000" 

110 TI$="000000" 

20 PRINT CHR$(l47) 

120 PRINT CHR$(l47) 

130 F0R X=0 T0 374 

40 PRINT "A"; 

50 IF X=374 THEN 80 

60 X=X+1 

140 PRINT "A"; 

70 GOTO 40 

170 NEXT 

80 PRINT 

180 PRINT 

90 PRINT TI/60 "SEK" 

190 PRINT TI/60"SEK" 

99 END 

199 END 


Die ungleichen Lücken zwischen den Zeilen, sowohl in 
der Numerierung als auch in der Schreibweise, dienen nur 
der Lesbarkeit, haben aber auf den Ablauf keinen Einfluß. 

Die 80er Zeilen rücken den Ausdruck des Ergebnisses 
nach unten. 

Ergebnis: 

ZÄHLER+GOTO-Schleife: 3.9333 SEK. 
FOR-NEXT-Schleife: 0.9666 SEK. 

Die FOR-NEXT-Schleife ist strahlender Sieger!! 

Diese Technik wollen wir verwenden, um eine Zeitbe¬ 
grenzung so in ein Programm einzubauen, daß es nach 
einer gewissen Laufzeit abgebrochen, beziehungsweise 
beendet wird. 


TI$="000000" 

setzt die Uhr auf Null. 


23.2. Zeitabhängige Programmunterbrechung 

Wenn das Programm im Prinzip aus einer oder mehreren 



SONDERHEFT 19 


91 





























GRUNDLAGEN 


C64 


Schleifen besteht, ist die Lösung einfach. Ist es ein gerade 
verlaufendes Programm, das an irgendeiner Stelle unter¬ 
brochen werden soll, wird die Sache schon schwieriger, 
weil die Abfrage der Zeit eigentlich dauernd erfolgen muß. 

Wir nehmen hier den leichteren Fall an die Reihe. Sie 
kennen doch sicher das alte Spiel »Stadt, Land, Fluß«, bei 
dem innerhalb einer festgesetzten Zeit aus jedem Sachge¬ 
biet ein Beispiel mit denselben Anfangsbuchstaben aufzu¬ 
schreiben ist. Eine Abwandlung dieses Spiels wähle ich als 
Anwendung einer Zeitsteuerung, die ich - wie immer - 
schrittweise mit Ihnen entwickeln möchte. 

1. Initialisierung 

Mit diesem Fremdwort bezeichnen wir das Herstellen 
des Anfangszustandes eines Programms. In unserem Fall 
soll festgelegt werden: 

- ein Sachgebiet (S$) 

- die Zeitdauer (Z) 

- der Anfangsbuchstabe (B$) 

Sachgebiet und Zeitdauer werden vom Spieler per 
INPUT eingegeben, der Buchstabe (von A bis Z) wird mit 
einem Zufallsgenerator erzeugt. 

100 PRINT CHR$(l47) 

110 INPUT "WAEHLE EIN SACHGEBIET";S$ 

120 INPUT "STELLE DIE UHR AUF";Z 
130 B$=CHR$(INT(RND(0)#26+65)) 

Ich glaube, zu den Zeilen 100 bis 120 ist nichts weiter zu 
sagen. 

Zeile 130 soll eine Zufallszahl erzeugen, deren ASCII- 
Code laut Tabelle auf Seite 135 des Bedienungshandbu¬ 
ches zwischen 65 (A) und 90 (Z) liegt. Das Kochrezept dazu 
habe ich in Lektion 10 erklärt. Seine Formel lautet wie folgt: 

Ganze Zahlen innerhalb des Zahlenbereichs von mini¬ 
mal Y bis maximal (Y+X-1) werden erzeugt durch: 

!NT(RND(0)*X+Y) S*<=R 

Zeile 130 wendet diese Formel an. Y liegt mit 65 fest, X 
errechnet sich aus (Y+X-1)=95 und ergibt 26. Bei Zeile 130 
bitte auf die Anzahl der Klammern aufpassen! 

Zeile 140 faßt die Initialbedingungen zusammen. Sie ist 
ein Beispiel für das Einfügen von Wörtern in einen vorgege¬ 
benen Text. Wichtig sind dabei die Leerzeichen im Text vor 
und nach den Stringvariablen S$ und B$. Versuchen Sie es 
ohne Leerzeichen, und Sie werden das unlesbare Resultat 
sehen. 

Zeilen 230, 240 und 250 geben den Startschuß. 

—► 140 PRINT"NENNE "S$", DIE MIT "B$" ANFÄNGEN" 
230 PRINT"START MIT IRGENDEINER TASTE": 

240 GET X$:IF X$=""THEN 240 
250 TI$="000000" 

Jetzt läuft eine Zeitschleife los, die wie im letzten »Weck¬ 
programm« einen vorgegeben Zeitwert Z mit dem Stand 
der eingebauten Uhr Tl$ vergleicht. 

—► 270 (Wörter eingeben) 

340 IF VAL)'TI$) () THEN 270 
Innerhalbder Zeilen 270 und 340 soll Folgendes passieren: 

- Wörter WS eingeben 

- Anfangsbuchstaben B$ überprüfen 

- Wörter aüsdrueken 

- richtige Wörter zählen (R) 

Zum Eingeben von Wörtern steht uns INPUT und GET 
zur Verfügung. 

INPUT erlaubt die Eingabe von kompletten Wörtern, 
indem es auf einzelne Zeichen wartet - macht aber damit 
die Wirkung der Zeitmeß-Schleife zunichte. 

GET wartet nicht und ermöglicht der Zeitschleife, in den 
Ablauf einzugreifen - nimmt aber nur einzelne Zeichen ent¬ 
gegen. Die Wirkung der Zeitschleife ist mir wichtiger, zumal 
man aus einzelnen Zeichen auch Wörter zusammensetzen 
kann! Wir nehmen also GET (Zeile 270). 

Das Zusammensetzen eines Wortes besorgt uns Zeile 


280, indem die einzelnen Buchstaben E$ zu einem Wort W$ 
einfach dazuaddiert werden: 

—► 270 GET S$ 

280 W$=W$+S$ 

Mit den Zeilen 270,280 und 340 haben wir eine Schleife, 
die solange Wörter zusammensetzen würde, bis der Zeit¬ 
vergleich alles abbricht. Versuchen Sie es mit RUN 270! 

Ein Wort wird dadurch abgeschlossen - wie bei INPUT - 
daß die RETURN-Taste gedrückt wird. Dann allerdings soll 
das Wort ausgedruckt und als Resultat (R) gezählt werden 
- wenn es richtig ist. Die primitivste Prüfung ist die des 
Anfangsbuchstabens. 

—► 290 IF E$ <> CHR$(13) THEN 340 

Zeile 290 prüft auf Drücken der RETURN-Taste, die den 
ASCII-Code 13 hat. Das heißt, sie prüft, ob die Taste nicht 
gedrückt ist. Dann rückt das Programm auf Zeile 340 wei¬ 
ter, mißt die Zeit, springt auf Zeile 270 zurück und schaut 
nach, ob ein neuer Buchstabe E$ eingegeben worden ist. 

Ist < RETURN > aber gedrückt, geht das Programm mit 
der Zeile 300 weiter. Diese schneidet sich mit dem 
LEFT$-Befehl den ersten Buchstaben des Wortes W$ ab 
und vergleicht ihn mit dem vorgegebenen Anfangsbuchsta¬ 
ben B$. 

—► 300 IF LEFT$(W$,1) <> B$ THEN 330 
310 PRINT W$ 

320 R=R+1 
330 W$="" 

Ist die Prüfung auf »ungleich« nicht erfüllt, das heißt, sind 
beide Buchstaben gleich, dann druckt Zeile 310 das Wort 
W$ aus und zählt es als richtiges Resultat R zu eventuell 
schon vorhandenen richtigen Resultaten dazu. Danach 
wird das eingegebene Wort W$ in Zeile 330 wieder 
gelöscht. 

Ergib' der Vergleich der beiden Buchstaben in Zeile 300 
aber, daß sie ungleich sind, dann überspringt Zeile 300 die¬ 
sen ganzen Teil, löscht in Zeile 330 das bisher eingegebene 
(aber falsche) Wort und macht in Zeile 340 mit der Schleife 
weiter. 

Nach Ablauf der Schleife, oder besser gesagt, nach 
Abbruch durch die Uhr, läßt Zeile 430/440 den Bildschirm- 


100 

PRINT CHRS<147) 

<129 • 

110 

INPUT"WAEHLE EIN SACHGEBIET":S$ 

< 235 > 

120 

INPUT"STELLE DIE UHR AUF";Z 

<082: 

130 

B$=CHR$(INTCRND<0>*26*65)) 

<006 > 

140 

PRINT"NENNE "SS", DIE MIT " BS " ANFAN 



GEN 

<0i0> 

200 


<176> 

210 

REM«*** ZEITSCHLEIFE 4 EINGABE **** 

<029> 

220 


<196> 

230 

PRINT"START MIT IRGENDEINER TASTE" 

<1 58> 

240 

GET XS:IF XS = ""THEN 240 

<214> 

250 

TIS="000000" 

<229> 

260 


<238> 

270 

GET ES 

<002> 

280 

W$=W$+E$ 

<152> 

290 

IF ESOCHRSf 13 ) THEN 340 

<039> 

300 

IF LEFTS(WS,1> <>B$ THEN 330 

<200> 

310 

PRINT WS; 

<001> 

320 

R=E+1 

<230> 

330 

WS = "" 

<193> 

340 

IF VAL(TIS><>Z THEN 270 

<239> 

400 


<122> 

410 

REM**** STOP 4 ERGEBNIS ****** 

<091> 

420 


<142> 

430 

FOR F=0 TO 14 

<014> 

440 

POKE 53280,F-NEXT F 

<120> 

450 

PRINT R 

<188> 

9 64’er 


Listing 8. Die eingebaute Uhr 



92 


SONDERHEFT 19 







i: Rolf Boyke 


C64 


GRUNDLAGEN 



rahmen bunt aufflimmern und Zeile 450 druckt das Resul¬ 
tat R, nämlich die Anzahl der eingegebenen Wörter aus: 

430 FOR F=0 TO 14 
440 POKE 53280,F:NEXT F 
450 PRINT R 

In Listing 8 ist das bisherige Programm vollständig dar¬ 
gestellt. Ich habe es dabei mit ein paar REM-Zeilen in funk¬ 
tionelle Blöcke unterteilt. 


LEKTION 24: 

Die Technik der Unterprogramme 


Das Spiel »Stadt, Land, Fluß« wird immer mit mehreren Per¬ 
sonen gespielt. Obwohl mir klar ist, daß ein derartiges Vor¬ 
haben mit dem Computer nicht ganz einfach zu organisie¬ 
ren ist - kein Spieler soll die Wörter des vorhergehenden 
Spielers sehen können - lasse ich dieses Detail außer acht 
und zeige Ihnen, wie man so einen mehrfachen Ablauf des¬ 
selben Programms programmiert. 

Wir brauchen dazu folgende Schritte: 

- Initialisierung, wie vorher 

- Frage nach der Zahl der Mitspieler 

- Schleife für entsprechend viele Durchgänge 

- Einzeldurchgänge pro Spieler 

- Speicherung der Einzelergebnisse 

- Ausdruck des Gesamtergebnisses 

Die Initialisierung mit den Zeilen 100 bis 130 bleibt also 
gleich. 

Jetzt stehen wir vor dem Problem, den eigentlichen 
Spielteil von Zeile 300 bis Zeile 340 so oft laufen zu lassen, 
wie Mitspieler vorhanden sind. Völlig unsinnig wäre es, die¬ 
sen Programmteil zu vervielfachen, da ja die Anzahl der 
Mitspieler variabel sein soll. 

Also müssen wir den Spielteil, der durch die Zeilen 200 
bis 340 gebildet wird, bei jedem Spieldurchgang neu 
»anspringen«. Dazu legen wir ihn zuerst einmal an das 
Ende des Programms. Das geht am schnellsten dadurch, 
daß Sie vor jede Zeilennummer eine 1 einfügen, wodurch 
wir einen Programmblock von 1200 bis 1340 erhalten, die 
Abstands- und REM-Zeilen mit eingeschlossen. 

Vorsicht! Wir haben innerhalb dieser Zeilen zwei Sprung¬ 
adressen, die wir ebenfalls ändern müssen: in Zeile 290 
und in Zeile 300. 

Die »alten« Zeilen 200 bis 340 müssen wir durch Eintip¬ 
pen ohne Inhalt der Reihe nach löschen. 

S3H? 


Wenn Sie das Programm LISTen, dann sitzt in der Tat der 
eigentliche Spielteil jetzt am Ende des Programms, und 
Zeilen 200 bis 340 sind verschwunden 

Dasselbe machen wir mit dem anderen Programm- 
Teilchen »STOP & ERGEBNIS«, das wir ebenfalls öfters ver¬ 
wenden wollen. Wir schieben es mit der oben genannten 
Methode auf 1400 bis 1450 und löschen Zeilen 400 bis 450. 

Jetzt haben wir Platz, um die Frage nach der Anzahl der 
Mitspieler einzubauen. Ich schiebe die Frage noch vor die 
Spielanweisung in Zeile 140, die ihrerseits in Zeile 220 
rutscht. 

—► 140 INPUT "WIEVIELE MITSPIELER";MS 
150 SP=1 

MS ist also die festgelegte Mitspielerzahl, die während 
eines Spiels konstant bleibt. Da wir aber mit Spieler 1 
anfangen und mit Spieler M$ aufhören, brauchen wir noch 
eine Spieler-Zählvariable, die pro Durchlauf hochgezählt 
wird. Ich nenne sie »SP« und setze sie in Zeile 150 auf 1. 

Als nächstes folgt die große Schleife für die Spieldurch¬ 
gänge pro Mitspieler. Ihre Zahl ist natürlich von MS abhän¬ 
gig: 

—► 70 SP=SP+1 

280 IF SPO MS+1 THEN 210 

Die Schleife zwischen den Zeilen 210 und 280 läuft 
solange, bis SP, welches am Anfang 1 ist und nach jedem 
Durchgang in Zeile 270 um 1 weitergezählt wird, die volle 
Mispielerzahl MS erreicht hat (Prüfung in Zeile 210 auf 
MS+1). 

In die Schleife lege ich jetzt die Anweisung der alten Zeile 
140 mit der Spielanleitung und welcher Mitspieler an der 
Reihe ist: 

—► 210 PRINT"MITSPIELER "SP" IST AN DER REIHE" 

220 PRINT"NENNE " S$ ", DIE MIT " B$ 

»- "ANFANGEN" 

Nach Zeile 220 muß jetzt der Sprung auf den Spielteil 
erfolgen, den wir ans Ende des Programms zwischen den 
Zeilen 1230 und 1340 geschoben haben. 

Bislang sind wir auf solche Stellen mit GOTO 1230 hin- 
und mit GOTO xxx wieder zurückgesprungen. Basic kennt 
aber einen Befehl, der das viel eleganter macht, den soge¬ 
nannten »Unterprogrammsprung«. Er heißt 
GOSUB-RETURN 

wobei »Sub« vom englischen »Subroutine« kommt. 

Der Befehl GOSUB steht anstelle des GOTO, RETURN 
kommt ohne weitere Angaben an den Schluß des anzu¬ 
springenden Programmteils, also dorthin, wo wir das 
zweite GOTO hingesetzt hätten. In unserem Fall sieht das 
so aus: 

—*• 230 GOSUB 1230 
1350 RETURN 

Wichtig ist noch zu erwähnen, daß der Programmteil zwi¬ 
schen den Zeilen 1230 und 1350 Unterprogramm heißt. 

Wichtig ist außerdem, daß der RETURN-Befehl dann 
automatisch auf die Zeile nach dem GOSUB springt. 

Sinn und Zweck der Unterprogramm-Technik ist, Pro¬ 
grammteile zu bilden, die man nicht nur innerhalb eines 
Programms mehrfach verwenden kann, sondern die auch 
in sich beliebig verändert werden können, ohne das Haupt¬ 
programm zu stören. Alles was bekannt beziehungsweise 
konstant bleiben muß, ist die Anfangs-Zeilennummer des 
Unterprogramms. 

Ein weiterer Vorteil eines Unterprogramms ist, daß es 
einzeln auf Band oder Diskette in einer »Unterprogramm- 
Bibliothek« gespeichert und in anderen Programmen ein¬ 
gesetzt werden kann, ohne es immer wieder neu program¬ 
mieren zu müssen. 

Wir erklären den Programmteil »STOP & ERGEBNIS« ab 
Zeile 1430 ebenfalls zum Unterprogramm und springen 
nach dem ersten Unterprogramm »ZEITSCHLEIFE & EIN- 
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GABE« mit einem zweiten GOSUB-Befehl dorthin. Voraus¬ 
setzung ist, daß es mit RETURN abgeschlossen ist: 

—► 240 GOSUB 1430 
1500 RETURN 

Wenn Sie das Programm jetzt schon laufen lassen, wer¬ 
den Sie sehen, daß nur noch wenig fehlt. Zum einen wer¬ 
den die Ergebnisse der einzelnen Mitspieler aufaddiert, 
zum zweiten fehlt noch eine Rücksetzung vor jedem neuen 
Spieler, und als letztes brauchen wir noch ein Gesamter¬ 
gebnis. Diese Dinge sind aber nichts Neues für uns. 

—*• 250 PRINT CHR$(l47) 

260 R=0 

Diese beiden Zeilen besorgen das Löschen und die 
Rücksetzung des Einzelresultats R. Dieses R müssen wir 
aber speichern, um es am Ende ausdrucken zu können. 
Das machen wir am Schluß des zweiten Unterprogramms, 
wo wir ja in Zeile 1450 das Einzelergebnis R ausdrucken. 

Das Gesamtergebnis besteht also aus soviel Einzeler¬ 
gebnissen, wie Mitspieler vorhanden sind. Das schreit 
nach einem Feld! 

Da sicher weniger als 11 Mitspieler vorzusehen sind, 
brauchen wir das Feld nicht zu dimensionieren. Wir teilen 
direkt einer Feldvariablen R(SP) die jeweiligen Einzelresul¬ 
tate zu, wobei SP ja von 1 bis MS hochgezählt wird. 
Dadurch werden alle anfallenden Werte von R gespeichert. 
—*• 1450 R(SP)=R 
1460 PRINT R(SP) 

1470 PRINT"ZUR FORTSETZUNG TASTE DRÜCKEN" 

1480 GET A$: IF A$="" THEN 1480 

Im Schiußteil wird das Endergebnis ausgedruckt. Es 
steht, wie gesagt, in einem Feld R(0), R(1),...R(letzter Spie¬ 
ler), das wir mit einer FOR-NEXT-Schleife ausdrucken: 

—► 430 F0R 1=1 T0 (SP-1) 

440 PRINT "SPIELER "I" HAT: "R(I) c 

450 NEXT I 
460 END 

Zeile 460 ist wichtig, da sie das Hauptprogramm von den 
Unterprogrammen trennt. 

Dieses Programm hat uns also in die Technik der Unter¬ 
programme eingeführt, außerdem haben wir durch eine 
Schleife mit Abfrage der inneren Uhr des C64 eine Zeit¬ 
steuerung des Programms erreicht, haben Farbänderun¬ 
gen eingesetzt und wir haben letztlich wieder einmal eine 


100 PRINT CHR$(147 > 

110 INPUT"WAEHLE EIN SACHGEBIET";S$ 

120 INPUT"STELLE DIE UHR AUF";2 
130 B$=CHR$<INT(RND(0>*26+65)> 

140 INPUT"WIEVIELE MITSPIELER";MS 
150 SP=1 

200 REM SCHLEIFE 

210 PRINT"SPIELER "SP" IST AN DER REIHE" 
220 PRINT"NENNE "S$” DIE MIT "B$" ANFANGEN 

230 GOSUB 1230 
240 GOSUB 1430 
250 PRINT CHR$(147) 

260 R=0 
270 SP=SP+1 

280 IF SPoMS+1 THEN 200 
400 : 

410 REM ***** ENDERGEBNIS ***** 

420 : 

430 FOR 1=1 TO (SP-1) 

440 PRINT"SPIELER "I" HAT: "R(I> 

450 NEXT I 
460 END 
1200 : 

1210 REM**** ZEITSCHLEIFE & EINGABE **** 
1220 : 

1230 PRINT"START MIT IRGENDEINER TASTE" 
1240 GET X$:IF X$=""THEN 1240 
1250 TI$="000000" 

1260 REM SCHLEIFE 
1270 GET E$ 

1280 W$=W$+E$ 

1290 IF E$OCHR$( 13) THEN 1340 
1300 IF LEFT$< WS,1)<>B$ THEN 1330 
1310 PRINT WS; 

1320 R=R+1 
1330 W$="" 

1340 IF VAL(TIS)<>Z THEN 1270 
1350 RETURN 
1400 : 

1410 REM**** STOP & ERGEBNIS ****** 


HH4 DR F=0 TO 14 
1440 POKE 53280,F-'NEXT F 
1450 R(SP)=R 

1460 PRINT"ZUR FORTSETZUNG TASTE DRUECKEN" 
1470 GET AS : IF A$=""THEN 1470 
1500 RETURN 
® 64'er 

Listing 9. Das fertige Stadt-Land-Fluß 


<129> 

<235> 

<082> 

<006> 

<197> 

<182> 

<124> 

<118> 

<080> 

<058> 

< 100 > 

<023> 

<231> 

<014> 

<077> 

< 122 > 

<080> 

<142> 

<074> 

<245> 

<024> 

<208> 

<160> 

<013> 

<180> 

<142> 

<087> 

<213> 

<168> 

<240> 

<136> 

< 200 > 

<125> 

<241> 

<214> 

<177> 

<049> 

<138> 

<106> 

<075> 

<126> 

<254> 

<104> 

<114> 

<203> 

<253> 

<032> 


Feldvariable verwendet. 

In Listing 9 ist das ganze Programm zusammengefaßt. 


Basic-Befehl Nr. 28 und 29 GOSUB-RETURN 

- der Befehl wird geschrieben: 

GOSUB Zeilennummer 

- er erzeugt einen Sprung in ein Unterprogramm, welches 
mit der hinter dem GOSUB stehenden Zeilennummer 
anfängt 

- das Unterprogramm muß mit RETURN in der letzten Zeile 
abgeschlossen werden 

- RETURN springt zurück auf die Zeile, die direkt hinter 
dem GOSUB-Befehl steht 

- Unterprogramme können auch geschachtelt werden 

- Unterprogramme können sich selbst aufrufen, aber nur 
bis zu 25 mal. Darüber hinaus ist zuwenig Speicherplatz 
zur Zählung der Aufrufe vorhanden 

-trifft ein Programm auf ein RETURN, ohne vorher ein 
GOSUB gesehen zu haben, reagiert der Computer mit 
Abbruch und Fehlermeldung »RETURN WITHOUT 
GOSUB« 


einen END-Befehl einfügen, um ein unerwünschtes Weiter¬ 
laufen des Programms zu verhindern. 

Es gibt nun auch die Möglichkeit, Unterprogramme prin¬ 
zipiell an den Anfang eines Programms zu legen. Das ver¬ 
meidet den Weiterlauf und hat außerdem eine kürzere Lauf¬ 
zeit. Ich habe das in dem Kurs »So macht man Programme 
schneller« im Sonderheft 2/1986 auf Seite 49 gemessen 
und beschrieben. 

Ein Programm sieht dann so aus: 

GOTO "Hauptprogramm" 


Unterprogramm Ul 
RETURN 


Unterprogramm U2 
RETURN 


"Hauptprogramm" 
GOSUB Ul 
GOSUB U2 


In Listing 9 haben wir die beiden Unterprogramme an das 
Ende gelegt. Das war leicht zu erreichen durch einfache 
Umnumerierung der Zeilen. Wir mußten aber ans Ende des 
Hauptprogramms - noch vor den Unterprogrammen - 


Diese Anordnung ist sicher nur dann empfehlenswert, 
wenn es auf Geschwindigkeit ankommt, und wenn viele 
Unterprogramme verwendet werden. 
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Programme, die mit vielen Unterprogrammen arbeiten, 
verwenden oft eine eigene Technik, um »bedienungs¬ 
freundlich« zu sein. Mit diesem Begriff bezeichnet die Com¬ 
puterwelt Programme, deren Bedienung so ausgelegt ist, 
daß man von den Details des Programms oder vom Compu¬ 
ter selbst praktisch nichts zu verstehen braucht. Ein 
wesentlicher Bestandteil davon sind die sogenannten 
»Menüs«. 

Ich schreibe diesen Kurs auf meinem C64 mit einem 
bekannten Textprogramm, das sich beim Einschalten mit 
folgendem Menü meldet: 

Fl Text bearbeiten 
F3 Neuen Text eingeben 
F5 Disk Inhalt 
F7 Disk Befehle 
F8 Ende 

Je nachdem, welche Funktionstaste ich drücke, kann ich 
einen bereits angefangenen Text weiterbearbeiten oder mir 
anschauen, welche Programme sich auf der Diskette befin¬ 
den oder spät in der Nacht mit <F8> Schluß machen! 

Jede Überschrift bildet ein eigenes Unterprogramm, auf 
das durch Drücken der vorgegebenen Funktionstaste 
gesprungen wird. 

Mit unseren heutigen Kenntnissen würden wir diese 5 
Funktionstasten mit 5 IF-THEN-Befehlen abfragen. Grö¬ 
ßere Menü brauchten dementsprechend mehr IF-THEN- 
Zeilen. 

In Basic gibt es einen Befehl, mit dem dies sehr viel leich¬ 
ter programmiert werden kann. Er heißt schlicht und ein¬ 
fach 

ON 

und wird in Verbindung mit dem GOTO oder GOSUB-Befehl 
verwendet. 

Ein ON-GOSUB-Befehl sieht so aus: 

ON X GOSUB 100,150,200,250 
Diese Zeile ist gleichbedeutend mit: 

IF X=1 GOSUB 100 
IF X=2 GOSUB 150 
IF X=3 GOSUB 200 
IFX=4 GOSUB 250 

Die Variable X darf also nur die Werte 1,2,3,4 etc. anneh¬ 
men. Entsprechend springt der GOSUB-Befehl auf die 
erste, zweite, dritte oder vierte Zeilennummer. 

Hinter dem ON-Befehl kann auch ein Formelausdruck 
stehen, nur gilt bezüglich.seines Resultats das gleiche wie 
für die Variable. Es ist klar, daß für Entscheidungen zu 
Unterprogrammsprüngen nicht immer derartige »saubere« 
Zahlen zur Verfügung stehen. Damit aber die Umrechnung 
in die Werte 1, 2, 3 usw. nicht aufwendiger als mehrere IF- 
GOSUB-Befehle wird, werden oft sehr pfiffige Rechen- und 
Programmierverfahren angewendet. Sie sind es fast immer 
wert, gesammelt zu werden, wenn man sie in einem Pro- 
grammlisting antrifft. 

Basic-Befehl Nr. 30 ON-GOSUB 

- der Befehl wird so geschrieben: 

ON Variable GOSUB mehrere Zeilennummern 
wobei die Zeilennummern durch Kommata getrennt sein 
müssen 

- die Variablenwerte legen fest, auf welche Zeilennummer 
der GOSUB-Befehl springt und zwar: 

1.0 bis 1.9 1.Zeilennummer hinter dem GOSUB 

2.0 bis 2.9 2.Zeilennummer... 

3.0 bis 3.9 3.Zeilennummer... 

und so weiter 

- ist die Variable kleiner als 1, springt der GOSUB-Befehl 
nicht auf eine der Zeilennummern, sondern auf die nach 
dem ON-GOSUB folgende Zeile 


- ist die Anzahl der Variablenwerte größer als die Anzahl 
der Zeilennummern, verhält sich der ON-GOSUB-Befehl 
wie beim Variablenwert 0 oder kleiner als 1 

- einen negativen Variablenwert quittiert der Computer mit 
ILLEGAL QUANTITY. 

- hinter dem ON-Befehl kann auch eine Formel oder eine 

Funktion stehen, nur gilt für ihre Werte dasselbe wie für 
die Werte einer Variablen._ 

Der Befehl ON darf auch in Verbindung mit dem GOTO- 
Befehl verwendet werden. 

Basic-Befehl Nr. 31 ON GOTO 

Für ON GOTO gilt das gleiche wie für ON GOSUB, nur 
werden die Sprünge nach den Regeln des GOTO-Befehls 
ausgeführt 


LEKTION 25: Positionierung des Cursors 


Ich möchte Ihnen noch schnell die Programmierung des 
obigen Menü zeigen. Ein Menü beginnt immer mit seiner 
Darstellung auf dem Bildschirm. Das geht einfach über 
PRINT-Befehle, die nur wenige Zeilen auf dem Bildschirm 
verteilen müssen. Da es lästig ist, mit programmierten 
Cursor-Tasten zu operieren, gibt es noch zwei andere Cur¬ 
sorbefehle, die wir gleich anwenden wollen. Der eine heißt 

TAB() 

abgeleitet von »Tabulator«, der andere heißt 

SPC() 

was vom englischen Wort »Space«, das heißt »Abstand« 
kommt. In der Klammer hinter den Befehlen kann eine Zahl 


voi 


maximal 255 stehen. 


eiae Befehle werden zusammen mit dem PRINT- 
Befehl verwendet. Beim TAB-Befehl rückt der Cursor aus¬ 
gehend vom linken Rand derjenigen Zeile, auf der er sich 
gerade befindet, um die in der Klammer stehende Anzahl 
von Leerstellen weiter. Der SPC-Befehl tut dasselbe, aber 
vom Punkt aus, auf dem sich der Cursor gerade befindet. 
10 PRINT CHR$(l47) 

20 PRINT SPC(90)"WAEHLEN SIE BITTE AUS" 

CHR$(147) löscht bekanntlich nicht nur den Bildschirm, 
sondern setzt auch den Cursor in die linke obere Ecke. Von 
dort aus springt er durch SPC(90) 90 Plätze weiter, das sind 
80 (also 2 Zeilen) und 10 Plätze. Sie können das leicht nach 
RUN auf dem Bildschirm abzählen. 

30 PRINT TAB(202)"(1) TEXT BEARBEITEN" 

Nach Ausführung der Zeile 20 steht der Cursor in der 
3. Zeile. 202 Plätze vom linken Rand der 3. Zeile aus 
gerechnet sind 5 Zeilen und 2 Plätze; also steht der Cursor 
in der 9. Zeile am 2. Platz, und die Klammer vor der 1 wird 
am 3. Platz gedruckt. 

Ich will Ihnen gestehen, ich habe es auch nicht gerech¬ 
net, sondern einfach ausprobiert. 

Die nächsten Zeilen verwenden in gleicher Weise den 
SPC-Befehl. 

40 PRINT SPC(82)"(2) NEUEN TEXT EINGEBEN" 

50 PRINT SPC(82)"(3) DISK INHALT" 

60 PRINT SPC(82)"(4) DISK BEFEHLE" 

70 PRINT SPC(82)"(5) ENDE" 

Die Unterprogramme, die wir über das Menü auswählen 
wollen, lassen wir ab Zeile 500 beginnen. Ich deute sie 
natürlich nur an: 

—► 500 PRINT CHR$(l47) 

510 PRINT "TEXT BEARBEITEN" 

520 END 
530 : 

540 PRINT CHR$(l47) 
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550 PRINT "NEUEN TEXT EINGEBEN" 

560 END 
570 : 

580 PRINT CHR$(l47) 

590 PRINT"DISK INHALT" 

600 END 
610 : 

620 PRINT CHR$(l47) 

630 PRINT"DISK BEFEHLE" 

640 END 
650 : 

660 PRINT CHR$(147) 

670 PRINT"ENDE" 

680 END 

Die Unterprogramme beginnen also der Reihe nach bei 
500, 540, 580, 620 und 660. Dementsprechend lautet der 
ON-GOSUB-Befehl: 

—► 110 0N A G0SUB 500, 540, 580, 620, 660 
120 PRINT"NULL" 

130 END 

Zeile 120 ist die Ziel-Zeile im Fall, daß für A ein Wert klei¬ 
ner als 1 eingegeben wird. 

Die Eingabe mache ich gewöhnlich mit GET A. 

In diesem Fall aber, wo ich Ihnen ermöglichen möchte, 
auch mit krummen Werten von A zu experimentieren, 
machen wir es mit INPUT. 

—► 100 INPUT A 

So einfach ist das. Bitte experimentieren Sie ein bißchen 
mit diesem Programm. 


Basic-Befehle Nr. 32 und 33 TAB(A) SPC(A) 

- hinter den beiden Befehlen steht eine Zahl von 0 bis 255. 
Sie muß in Klammern stehen 

- TAB(I) und SPC(I) werden in Verbindung mit dem PRINT- 
Befehl verwendet 

- mit PRINT TAB(I) beginnt der Ausdruck auf dem Bild¬ 
schirm (oder auf dem Drucker) an dem durch I definierten 
Platz 

1=0 definiert den linken Rand der Zeile, auf welcher der 
Cursor sich gerade befindet, mit 1=20 werden 20 Plätze 
vom linken Rand aus übersprungen 

- mit PRINT SPC(I) beginnt der Ausdruck um genau 
soviele Plätze hinter der augenblicklichen Position des 
Cursors, wie durch I definiert werden 

1=0 bedeutet die augenblickliche Cursorposition, mit 
1=20 werden 20 Plätze übersprungen 

- beide Befehle springen auf den angegebenen Platz, 
ohne die übersprungenen Plätze zu löschen 


Bei dieser Gelegenheit bietet es sich an, einen weiteren 
Basic-Befehl zu erwähnen, der wie SPC und TAB mit der 
Position des Cursors auf dem Bildschirm zu tun hat, aller¬ 
dings in anderer Weise. Er heißt 

POSO 

was von POSITION abgeleitet ist. Seinem Namen entspre¬ 
chend liefert er die aktuelle Position des Cursors auf dem 
Bildschirm. 

Die Sache mit dem Cursor ist nicht ganz so genau zu 
nehmen. Es gibt ja Möglichkeiten innerhalb eines Pro¬ 
gramms, wo der Cursor überhaupt nicht auftaucht, zum 
Beispiel bei einer Stringmanipulation. In diesen Fällen 
zeigt POS die Position hinter dem gerade bearbeiteten Zei¬ 
chen an. Denken Sie bitte daran, daß die Positionen in einer 
Zeile von 0 bis 39 gezählt werden. Ein Beispiel macht das 
viel klarer: 

PRINT"01234567" P0S(0) 

Dieser Direktbefehl druckt zuerst den String, bestehend 
aus den Ziffern 0 bis 7 aus und dann die Position hinter dem 
letzten Zeichen, und das ist die 8. 


Übrigens: hinter POS steht eine Klammer. Die Variable - 
auch Argument genannt- hat keine Bedeutung, es muß nur 
irgendeine Variable oder ein beliebiger Wert in der Klam¬ 
mer stehen. Sie wird im Fachjargon »Dummy«-Argument 
genannt. 

Leider hat der POS-Befehl eine Einschränkung. Er wirkt 
nur innerhalb einer »logischen« Zeile, nicht aber auf dem 
ganzen Bildschirm. Oder anders ausgedrückt, erwirkt nur 
waagrecht, nicht aber senkrecht, mit Ausnahme der Logi¬ 
schen Zeile. Was das ist, haben wir in Lektion 5 gelernt - es 
ist eine durch eine Zeilennummer gekennzeichnete Pro¬ 
grammzeile, die maximal aus zwei vollen Bildschirmzeilen 
bestehen kann. Der POS-Befehl gibt als Resultat daher 
Zahlen von 0 bis 79 aus. 

Den Beweis bringen folgende Programmzeilen: 

10 PRINT CHR$(147) 

20 PRINT TAB(238) "AAAAAA" P0S(0) 

30 PRINT TAB(238) "B" P0S(0) 

40 PRINT SPC(40) P0S(0) 

Nach den beiden TAB-Befehlen erscheinten die Posi¬ 
tionsnummern 44 und 39. Und nach dem SPC-Befehl für 40 
Leerstellen erscheint die Positionsnummer 0, denn diese 
logische Zeile ist gerade 1 Bildschirmzeile lang, so daß die 
nächste Positionsnummer 0, das heißt, der Anfang der 
nächsten logischen Zeile ist. 

Der POS-Befehl kann natürlich gut für eine Abfrage ver¬ 
wendet werden nach dem Muster: 

240 IF P0S(0) > 25 THEN . 


Basic-Befehl Nr. 34 POS (Argument) 

- er liefert die aktuelle Position des Cursors auf dem Bild¬ 
schirm innerhalb einer »logischen« Zeile, das heißt Werte 
vog o bis 79 

- wiro Kein Cursor angezeigt, dann bezeichnet er die Posi¬ 
tion hinter dem zuletzt berabeiteten Zeichen 

- das Argument in der Klammer hinter dem POS-Befehl ist 
ein »Dummy«-Argument; es muß vorhanden sein, kann 
jedoch irgendeinen beliebigen Wert haben 

Ich habe bei der Aufzählung der Vorteile, welche die 
Unterprogramm-Technik attraktiv machen, erwähnt, daß es 
sinnvoll ist, sich eine Bibliothek von nützlichen Unterpro¬ 
grammen anzulegen, die dann immer wieder in andere 
Programme eingebaut werden können. Nun, das klingt gut 
und einleuchtend, aber wie hängt man ein Unterprogramm, 
das in der »Bibliothek« - sprich auf Band oder Diskette - 
steht, an ein Hauptprogramm im Computer? 

Gute Frage, kann ich nur sagen, denn das Basic der 
Commodore-Computer kennt leider keinen Befehl dafür. Es 
gibt ihn, bei anderen Computern oder bei Befehlserweite¬ 
rungsprogrammen. Er heißt MERGE oder manchmal auch 
APPEND, was mit »Verschweißen« oder »Anhängen« über¬ 
setzt werden kann. Wir müssen ihn in Basic nachvoll¬ 
ziehen, was aber nicht schwer ist. 

LEKTION 26: 

Programme zusammenbinden 


Wie gesagt, MERGE ist kein Basic-Befehl, sondern ein 
Kochrezept. 

Ich schreibe Ihnen zuerst das Kochrezept auf und erkläre 
anschließend, was dabei vorgeht. Es werden folgende 
Schritte gemacht: 

1. Ein Programm steht im Speicher (RAM) des Compu¬ 
ters. Ein zweites Programm, das auf Band oder Diskette 
steht, soll dazugeladen werden. 

2. Da das Programm auf Band oder Diskette (2. Pro- 
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gramm) hinter das Programm im RAM (1. Programm) 
gehängt wird, ist es empfehlenswert, daß das 2. Programm 
höhere Zeilennummern als das 1. Programm hat. 

3. Die folgende Zeile direkt eingeben und mit 

< RETURN > abschließen: 

—► POKE 43,PEEK(45)-2:P0KE 44,PEEK(46) 

4. Jetzt wird das 2. Programm ganz normal mit LOAD in 
den Computer geladen 

5. die folgende Zeile direkt eingeben und mit 

< RETURN > abschließen: 

—► POKE 43,1:POKE 44,8 

Das ist alles; jetzt steht das 1. Programm und das 2. Pro¬ 
gramm aneinandergehängt im Speicher des C64. 

Zur Erklärung dieses Kochrezeptes muß ich Sie an das 
Speicherbild in Lektion 21 erinnern, in dem ich die 
Speicheraufteilung dargestellt habe. Wie dort gezeigt, 
beginnt der für Programme verfügbare RAM-Speicher ab 
Adresse 2048 und geht bis 40959. 

In diesem Bereich stehen nun die Zeilen eines Pro¬ 
gramms, alle Namen und augenblicklichen Werte von 
Variablen, Felder und schließlich auch alle Texte von String- 
Variablen. Um ein Chaos zu vermeiden und um die Such¬ 
zeiten nach Variablenwerten möglichst kurz zu halten, ist 
dieser Speicherteil in Bereiche unterteilt. 

Der Arbeitspeicher ist unabhängig von seiner durch 
Speichererweiterung veränderbaren Größe in vier Blöcke 
und einen Freiraum eingeteilt. 

- Block 1 beginnt immer an 2048 und enthält die Zeilen 
(Text) eines eingegebenen Programms. Sein oberes 
Ende ist variabel, es hängt von der Länge des Programms 
ab. Deshalb habe ich diese Grenze als Strich mit einem 
Pfeil dargestellt. 

- Block 2 schließt sich direkt an Block 1 an und enthält die 
numerischen Variablen und die Namen den String- 
Variablen. Sein Anfang ist identisch mit dem Ende des 1. 
Blocks. Deshalb ist dieser Anfang ebenfalls variabel. 
Dadurch ist aber auch das Ende von Block 2 variabel. 
Wenn zum Beispiel in ein Programm weitere Zeilen ein¬ 
gefügt werden, rutschen alle mit Pfeil markierten Gren¬ 
zen der Speicherbereiche nach oben. 

- Block 3 enthält alle Felder. 

- Block 4 beginnt am obersten Ende des Arbeitsspeichers 
und hängt von der Ausbaustufe des Speichers ab. 

Er enthält alle Texte der String-Variablen, auch die der 
Felder. Je nach Länge beziehungsweise Menge der Texte 
bewegt sich die Grenze des 4. Blocks nach unten, 
solange bis sie die Grenze des 3. Blocks (die ja nach oben 
wandert) trifft. Dann ist der Speicher voll, und der Compu¬ 
ter meldet OUT OF MEMORY. 

Jetzt kommt der Aspekt der Speicheraufteilung, der für 
unser MERGE-Kochrezept wesentlich ist. Es ist sicher ver- 
ständich, daß der Computer, oder besser gesagt seine 
»Betriebsleitung«, jederzeit wissen muß, wo gerade die ver¬ 
schiedenen Grenzen der Blöcke liegen. Das Betriebs¬ 
system besitzt dazu im Systemspeicher (von Adresse 0 bis 
1023) einige Speicherzellen, in denen der jeweilige Adres¬ 
senstand der Blockgrenzen gespeichert ist. 

Diese Adressen treten immer paarweise auf. Das liegt 
daran, daß in einer Speicherzelle allein stets nur Zahlen 
von 0 bis 255 gespeichert werden können. Das ergäbe 256 
Adressen - wir brauchen aber mehr. Wenn man zwei Zellen 
sozusagen aneinanderhängt, erreicht man dadurch 
256*256=65536 Adressen. Diese doppelte Wortlänge - 
auch Low-/High-Byte-Darstellung genannt - erfordert 
natürlich einen Rechenvorgang, um aus dem Inhalt von 
zwei Speicherzellen die dadurch repräsentierte Adresse zu 
erhalten. 

Wie und warum das so ist, erkläre ich ein paar Absätze 
weiter unten im Abschnitt »Die Low-/High-Byte-Darstel- 


lung«. Hier ist nur die Umrechnungsformel interessant. 
Steht in den beiden Speicherzellen X und Y eine Adresse, 
wird diese ausgerechnet mit: 

Adresse = X + 256*Y 

Das MERGE-Konzept wollen wir dadurch ausprobieren, 
daß wir vor das Listing 8 (das Spiel mit Zeitbegrenzung) das 
Listing 6, nämlich die farbige Umrandung setzten und so 
ein Programm mit Vorspann daraus machen. 

In dem Speicherzellenpaar 43/44 steht also die Anfangs¬ 
adresse des Arbeitsspeichers. Wir prüfen das nach mit: 
—► X=PEEK(43):Y=PEEK(44) 

PRINT X:PRINT Y 
PRINT X+256#Y 

Das ganze geht natürlich viel kürzer in einer einzigen 
Zeile: 

—► PRINT PEEK(43) + 256 * PEEK(44) 

Wir erhalten beim C64 die Zahl 2049 als Speicheran¬ 
fang. Entsprechend steht im Speicherzellenpaar 45/46 die 
Adresse des Endes von Block 1. 

Laden Sie bitte Listing 6 in den Speicher und überprüfen 
das Blockende mit: 

—► PRINT PEEK(45) + 256 * PEEK(46) 

Bei mir erscheint da die Zahl 2252, ich hoffe, bei Ihnen 
auch. 

Beim MERGE-Kochrezept führen wir das Betriebssy¬ 
stem des C64 hinters Licht. Mit den Befehlen: 

—► POKE 43,PEEK(45)-2:POKE 44,PEEK(46) 
schreiben wir in die Speicherzelle 43 diejenige Zahl, um 2 
vermindert, die in Speicherzelle 45 steht. Das gleiche 
machen wir mit der Speicherzelle 44. 

Dadurch verschieben wir mutwillig die Anfangsadresse 
des Arbeitsspeichers an das Ende des Blocks 1. Da die letz¬ 
ten 2 Speicherzellen hinter einem Programm zur Kenn¬ 
zeichnung des Endes immer nur Nullen enthalten, ziehen 
wir die 2 ab. 

Der Computer glaubt nun, der Arbeitsspeicher beginne 
bei Adresse 2550 - und ab da lädt er jetzt das Listing 8, ohne 
Listing 6 zu berühren. Danach allerdings müssen wir die 
Anfangsadresse wieder an ihren ursprünglichen Platz 
schieben mit: 

—*• POKE 43,1:POKE 44,8 

denn 1+256*8 ergibt 2049, was vorher ja dort stand. 

Wenn Sie jetzt LISTen, dann stehen beide Programme 
als ein neues größeres Programm im Speicher und es kann 
- unter neuem Namen - gespeichert werden. 

Speicherzellenpaare wie 43/44,45/46 nennen wir Zeiger, 
weil sie auf eine andere Adresse zeigen. Das Hantieren mit 
Zeigern ist eine sehr reizvolle Sache. Ich bin sicher, Sie wer¬ 
den noch oft damit konfrontiert. Es gibt viele Artikel darüber, 
ich will mich in diesem Anfängerkurs auf das bisher 
Gesagte beschränken - es soll ja auch nur eine Einführung 
sein. 

Doch halt, die doppelte Wortlänge muß ich noch erklä¬ 
ren. 


LEKTION 27: 

Die Low-/High-Byte-Darstellung 


Ich setze voraus, daß Sie das duale Zahlensystem mit sei¬ 
nen Nullen und Einsen kennen, und daß Sie dadurch wis¬ 
sen, was ein Bit ist, außerdem, wie man Dualzahlen in Dezi¬ 
malzahlen und umgekehrt umwandelt. 

Sollte dies jedoch nicht der Fall sein, dann lessn Sie bitte 
im 64’er Sonderheft 5/1986 auf Seite 90 den Tsil Bits und 
Bytes - er gibt eine kleine Einführung. 

Eine Speicherzelle des C64 hat eine Länge von & Bit = 
1 Byte. 
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C64 


Mit diesen 8 Bit können Zahlen von 0 bis 255 dargesteilt 
werden. Zur Darstellung von Zahlen über 255 verwenden 
wir die Low-/High-Byte-Methode. 

Wir hängen einfach 2 Speicherzellen zusammen, mit 
deren 16 Bit wir Zahlen bis maximal 65535 darstellen kön¬ 
nen. Die maximale Zahl 65535 ist übrigens auch die höch¬ 
ste Adresse des gesamten Speichers - was natürlich kein 
Zufall ist. 

Ich will Ihnen jetzt zeigen, wie eine Dezimalzahl auf zwei 
8-Bit-Speicherzellen verteilt wird und umgekehrt: Wie aus 
zwei Bytes eine Dezimalzahl gebildet wird. 

Schauen Sie sich das folgende Beispiel an: 


DEZIMAL 

47491 

DUALZAHL 

1011 1001 


1000 0011 

HIGH BYTE 

185 


LOW BYTE 


131 


Wir gehen von der Dezimalzahl 47491 aus. Ihre duale 
Darstellung mit 16 Bit - 1011100110000011 - teilen wir ein¬ 
fach in der Mitte und erhalten damit zwei neue Dual-Zahlen 
mit je 8 Bit = 1 Byte. Das linke Byte nennen wir High-Byte, 
da es den höheren Teil der Gesamtzahl darstellt. Das rechte 
Byte heißt entsprechend Low-Byte. Jedes der beiden Bytes 
kann für sich allein in einer Speicherzelle untergebracht 
werden, in der natürlich dann der dezimale Wert des Bytes 
steht. Zur Umrechnung der Low-/High-Bytes empfehle ich 
folgende Kochrezepte: 

Dezimal in Low-/High-Byte 
47491:256=185 (High-Byte), Rest 131 (Low-Byte) 

Der Rest fällt bei der Division per Hand automatisch an. 
Mit dem (Taschen)Rechner erhält man den Rest durch: 

185*256-47491 =-131 
Low-/High-Byte in Dezimal 
High-Byte * 256 + Low-Byte = Dezimal 
185 * 256 + 131 = 47491 

Eine wichtige Regel gilt es noch zu beachten: Der Mikro¬ 
prozessor des C64 verlangt, daß immer das Low-Byte vor 
dem High-Byte kommen muß. Die Zahl wird sozusagen von 
rechts nach links gelesen, in unserem Beispiel 131, 185. 


LEKTION 28: Dateien (Files) 


ln Lektion 20 haben wir ein Programm gebaut, in dem 
Variablenwerte in ein Feld gespeichert wurden. Wir waren 
damals noch nicht in der Lage, diese Feldvariablen auf 
Band oder Diskette abzuspeichern. Ich habe Sie damals 
gebeten, das Programm-Fragment abzuspeichern, bis wir 
soweit wären, mehr vom Speicher und vom Speichern zu 
wissen. 

Jetzt sind wir soweit. Ein Blick auf Bild 7 macht es uns 
deutlich. Mit den Befehlen LOAD speichern wir nur den 
Inhalt vom 1. Block ab. Die Feldvariablen stecken aber im 

3. Block!! 

28.1. Der Unterschied zwischen Programm und Datei 
(File) 

Der Computer unterscheidet glücklicherweise beim 
Speichern auf externe Speichergeräte (Datasette, Diskette) 
zwischen Daten aus dem 1. Block und den Blöcken 2,3 und 

4. Daten aus den letzteren nennen wir eine Datei oder auf 
englisch File. 

Ein Programm besteht aus einer Ansammlung von 
numerierten Zeilen. Jede Zeile enthält Anweisungen an 
den Computer. Diese Anweisungen werden nach RUN zei¬ 


lenweise ausgeführt, in Reihenfolge der aufsteigenden Zei¬ 
lennummern. 

Eine Datei (File) besteht aus rohen Daten, wie Angaben 
in einem Adreßbuch, ohne jede Angabe, was damit 
gemacht werden soll. Der bekannte Computerjournalist 
Richard Mansfield hat zur Erklärung dieses Unterschieds 
einmal das einleuchtende Beispiel einer Dose mit Tomaten¬ 
suppe gebracht. Der Aufkleber der Dose enthält sowohl 
eine Datei als auch ein Programm. 

Die Datei lautet: 

Wasser, Tomaten, Salz, 

Monosodiumglutamat, Farbstoff, 

Oleoresin 

Das Programm lautet: 

1. Vorsichtig öffnen 

2. Inhalt in einen Topf leeren 

3. eine Tasse Wasser hinzufügen 

4. auf kleiner Flamme erhitzen 

5. ungewürzt servieren 

Ich bin sicher, Sie sehen jetzt den Unterschied. 
Programme werden mit SAVE auf Band und auf Diskette 
gespeichert. 


Dateien werden mit einer eigenen Befehlskombination 
OPEN, PRINT # und CLOSE sowohl auf Band, als auch 
auf Disketten gespeichert. 

Genau das wollen wir jetzt lernen. 

28.2. Dateien (Files) speichern 
Wenn man eine Datei laden oder speichern will, muß zu 
allererst eine Verbindung zwischen Computer und dem 
externen Speichergerät hergestellt werden. Ich meine 
damit nicht das Verbindungskabel, das brauchen wir bei 
Speichern und Laden von Programmen ja auch. Ich meine 
hier eine Anweisung an den Computer, sich für den Transfer 
von Daten über das externe Gerät bereitzuhalten. 

Man nennt das auch: 

»eine Datei eröffnen«. 

Es ist vergleichbar mit dem Herausziehen und Öffnen 
eines Karteikastens, um Zugriff zu den Daten auf den Kar¬ 
teikarten zu haben. 

Der Befehl dazu heißt 

OPEN 

was natürlich »Öffnen« heißt. 


Basic-Befehl Nr. 35 OPEN 

- der OPEN-Befehl öffnet eine Datei zum Schreiben oder 
Lesen. Mit diesem Befehl wird automatisch ein Puffer¬ 
speicher angelegt, mit dem die verschiedenen Arbeits¬ 
geschwindigkeiten der externen Speichergeräte ausge¬ 
glichen werden können. 
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- hinter dem OPEN-Befehl stehen bis zu 6 weitere An¬ 
gaben, die durch Kommata voneinander getrennt sein 
müssen. Diese Angaben sind: 

OPEN Dateinummer,Gerätenummer, 
Sekundäradresse, "Dateiname,Typ,Modus" 


Die zusätzlichen Angaben hinter OPEN bedürfen einer 
Erklärung. Sie sind sicher für den Anfänger verwirrend, 
und wir brauchen sie jetzt auch gar nicht alle. Man findet 
jedoch selten eine komplette Übersicht, daher mache ich 
die Aufstellung vollzählig - für später. 

Datei-Nummer 

ist die Kennzeichnung der eröffneten Datei. Sie kann 
eine Zahl zwischen 1 und 255 sein. Sie ist wichtig und dient 
als Referenz beim Umgang mit dieser bestimmtem Datei; 
dies um so mehr, als gleichzeitig bis zu 10 verschiedene 
Dateien geöffnet sein können. 

Gerätenummer 

ist eine Kennzahl dafür, mit welchem externen Gerät die 
Verbindung hergestellt wird. Dabei gilt: 

0 Tastatur 

1 Kassettenrecorder (Datasette) 

3 Bildschirm 

4 Drucker 1 

5 Drucker 2, meistens Plotter 

8 Diskettenlaufwerk 1 

9 Diskettenlaufwerk 2 

4 bis 127 Geräte, die am seriellen Bus angeschlossen sind 
128 bis 255 Geräte über seriellen Bus, mit einem Zeilenvor¬ 
schub nach dem Zeilenende. 

Diese Angaben sagen Ihnen jetzt noch nichts. Übrigens: 
Wenn die Gerätenummer weggelassen wird, stellt der 
Computer automatisch die 1 für Datasette ein. 
Sekundär-Adresse 
kann eine Zahl zwischen 0 und 255 sein. Diese Zahl hat 
bei den verschiedenen externen Geräten unterschiedliche 
Bedeutung. 

keine Wirkung 
0 vom Band lesen 

1 auf Band schreiben 

2 auf Band mit »Bandende- 
Markierung schreiben 
keine Wirkung 

0 bis 10 die Funktionen sind bei den 
Druckerfabrikaten zum Teil 
unterschiedlich, bitte im 
Drucker-Handbuch nachsehen 


or 


Tastatur 
Kassettenrecorder 


Bildschirm 

Drucker 


Diskettenlaufwerk 

0 und 1 
2 bis 14 


15 


vom Betriebssystem reserviert 
reserviert einen numerierten 
Datenkanal, bis zu 
drei gleichzeitig 
reserviert einen Befehls-Kanal 


Datei-Name 

steht immer zwischen Anführungszeichen. Er kann bei 
der Datasette auch weggelassen werden. 

Datei-Typ 

wird nur bei Diskettenoperationen verwendet und steht 
innerhalb der Anführungszeichen hinter dem Datei- 
Namen; er bezeichnet die folgenden Typen: 

S sequentielle Datei 
U User-Datei 
P Programm-Datei 
R relative Datei 

Wir werden uns im Rahmen dieses Kurses nur mit 
sequentiellen Dateien befassen, erstens weil mit der Data¬ 
sette nur dieser Typ möglich ist und zweitens, weil er leich¬ 
ter zu verstehen ist. 


Modus 

wird nur bei Diskettenoperationen verwendet und legt 
fest, wie der Datenkanal genutzt werden soll: 

W Schreiben einer Datei (Write) 

R Lesen einer Datei (Read) 

A Verlängern einer sequentiellen Datei (Append) 

M Lesen einer nicht geschlossenen Datei 
Nun bitte keine Panik! 

In diesem Kurs brauchen wir nur Bruchteile daraus. Aber 
immerhin ist das alles ein guter Fingerzeig, daß speziell 
Diskettenoperationen sehr raffiniert sein können. 

Zurück zur Anwendung des OPEN-Befehls. Mit: 

—► 10 OPEN 1,1,1,"TEXT" 

eröffnen wir also die Datei "TEXT" auf der Datasette. 

Für die Diskette lautet derselbe Befehl: 

—► 10 OPEN 1,8,3,"TEXT,S,W" 

S steht für sequentielle Datei, W für Schreiben. 

Um jetzt Daten auf das externe Gerät schreiben zu kön¬ 
nen, verwenden wir eine Variante des PRINT-Befehls, er 
heißt 

PRINT# 

Hinter PRINT # muß immer dieselbe Datei-Nummer ste¬ 
hen, die beim OPEN-Befehl verwendet worden ist - sie ist 
die Referenz. Danach folgt die zu schreibende Variable. 

—► 20 PRINT#1, "FUSSBALL" 

30 PRINT#1, "TENNIS" 

Damit haben wir die zwei Wörter abgesendet. Hinter 
einem PRINT #-Befehl darf Immer nur eine Variable oder 
ein String stehen, damit die die Daten in der Datei einen 
Abstand haben. Als nächstes muß die eröffnete Datei wie¬ 
der geschlossen werden. Entsprechend zum Eröffnungs¬ 
befehl lautet der Schließbefehl CLOSE. Er wird mit der 
Nummer der Datei versehen. 

CLOSE 1 
50 END 

Wenn Sie diese vier Zeilen laufen lassen, fordert die 
Datasette zum Drücken der RECORD- und PLAY-Tasten 
auf, das Diskettenlaufwerk läuft sofort los und die Datei ist 
gespeichert. 

Dasselbe machen wir jetzt für ein anderes Ausgabege¬ 
rät, nämlich für den Drucker - mit der Gerätenummer 4. 

—*• 10 OPEN 1,4 

20 PRINT#1, "FUSSBALL" 

30 PRINT#1, "TENNIS" 

40 CLOSE 1 

Zeile 10 bewirkt, daß die beiden Wörter jetzt vom Drucker 
ausgedruckt werden. 

Basic-Befehl Nr. 36 PRINT# 

- der PRINT #-Befehl sendet Daten einer Datei auf Band, 
Diskette oder Drucker. Maximal können mit einem 
PRINT #-Befehl 255 Zeichen gesendet werden 

- dem PRINT#-Befehl muß dieselbe Dateinummer folgen 
wie dem OPEN-Befehl, der die Datei eröffnet hat 

- es können numerische und String-Variable sowie Feld- 
Variable gesendet werden. Wichtig ist, daß die einzelnen 
Variablen durch das RETURN-Zeichen voneinander 
getrennt sind. RETURN kann entweder durch separate 
PRINT#-Befehle oder durch CHR$(13) erzeugt werden 

Basic-Befehl Nr. 37 CLOSE 

- dieser Befehl schließt eine eröffnete Datei 

- der CLOSE-Befehl wird lediglich mit der Nummer der 
Datei versehen, die er schließen soll 

-jede Datei muß unbedingt geschlossen werden, da 
andernfalls keine Endmarkierung hinter die letzte Daten¬ 
eintragung geschrieben wird. Dadurch können die letz¬ 
ten Daten verlorengehen. In dem Inhaltsverzeichnis 
(Directory) einer Diskette ist eine nicht geschlossene 
Datei mit dem Stern »»« gekennzeichnet. 
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28.3 Dateien (Files) laden 

Jetzt kommt der andere Teil - eine auf Band oder Diskette 
gespeicherte Datei in den Computer laden oder lesen.Die 
Datei muß wieder eröffnet werden, diesmal zum Lesen. 

Für die Datasette lautet der Befehl: 

100 OPEN 1,1,0,"DATEI" 

Für die Diskette dagegen muß es heißen: 

100 OPEN 1,8,3,"DATEI,S,R" 

Um Daten einer Datei zu lesen, gibt es gleich zwei 
Befehle, die Sie in ähnlicher Form schon kennen, nämlich 
INPUT# undGET#. 

Zuerst wenden wir den INPUT#-Befehl an. 

In unserer Datei haben wir zwei Strings gespeichert. Mit 
folgender Zeile lesen wir sie: 

110 INPUT# 1,A$,B$ ■ 

120 PRINT A$,B$ 

130 CL0SE 1 

In Zeile 120 trenne ich das Ausdrucken von A$ und B$ mit 
einem Komma. Mit dem Klebeeffekt des Semikolon würde 
nämlich das Wort FUSSBALLTENNIS ausgedruckt wer¬ 
den. Probieren Sie das kleine Leseprogramm mit RUN 100 
aus. 

Das ganze Listing für Schreiben und Lesen einer String- 
Datei sieht so aus: 


Wir wollen noch die Wirkungsweise des GET#-Befehls 
ausprobieren. Ersetzen Sie im ersten Programm in Zeile 
110 das INPUT# durch GET#: 

110 GET#1,A$,B$ 

Nach RUN 100 erhalten wir den weit auseinandergezo¬ 
genen Ausdruck der Buchstaben F und U. So geht es also 
nicht - GET# nimmt immer nur ein Zeichen. 

Wir müssen GET # wiederholteinsetzten, am besten mit 
einer Schleife. 

110 GET#1,A$ 

120 PRINT A$; 

125 GOTO 110 

Jetzt erhalten wir die beiden Wörter FUSSBALL und 
TENNIS, aber die Schleife stoppt nicht. Wir prüfen daher, 
wann das letzte Zeichen erscheint und CLOSEn dann die 
Datei. Dazu müssen wir im Eingabeteil (Zeile 30) hinter dem 
letzten String ein einzigartiges, erkennbares Zeichen ein- 
setzen. Ich habe einfach hinter Tennis ein Leerzeichen 
gesetzt. 

Leider müssen wir dadurch die Datei neu eingeben, am 
besten mit einem anderen Namen in Zeile 10 und 100. Oder 
aber Sie löschen die alte Datei »TEXT«. 

—► 30 PRINT #1, "TENNIS " 

123 IF A$=" " THEN 130 


10 OPEN 1,1,1,"TEXT" 

10 OPEN 1,8,3,"TEXT,S,W" 
20 PRINT#1, "FUSSBALL" 

30 PRINT#1, "TENNIS" 

40 CL0SE 1 
50 END 
60 : 

100 OPEN 1,1,0,"DATEI" 

100 OPEN 1,8,3,"DATEI,S,R' 
110 INPUT #1,A$,B$ 

120 PRINT A$,B$ 

130 CL0SE 1 


..für 
, .für 


Band 

Diskette 


Das sind die geänderten Zeilen. 


..für Band 
..für Diskette 


s-*en 


Für eine Datei mit numerischen Variablen sieht das Pro¬ 
gramm fast gleich aus: 


200 OPEN 1,1,1,"ZAHLEN" 

200 OPEN 1,8,3"ZAHLEN,S,W" 
210 PRINT# 1,35 
220 PRINT# 1,14 
PRINT #1,753 
PRINT# 1,2 
CL0SE 1 
END 


..für Band 
..für Diskette 


Basic-Befehl Nr. 39 GET# 

- der GET #-Befehl funktioniert genauso wie der normale 
GET-Befehl: Er liest einzelne Zeichen einer geöffneten 
Datei von einem Eingabegerät. Die Anzahl der Zeichen 
(Länge der Strings) ist beliebig 

- hinter GET # muß die Datei-Nummer des OPEN-Befehls 
stehen 

7 GEX # kann nicht im Direkt-Modus verwendet werden 

Das wiederholte Schreiben der einzelnen PRINT #-Be¬ 
fehle ist natürlich sehr lästig. Besser geht das mit einer 
FOR-NEXT-Schleife, wobei die zu speichernden Daten ent¬ 
weder direkt per normalen INPUT-Befehl eingegeben oder 
mit READ aus gespeicherten DATA-Zeilen geholt werden. 
Ich zeige das an unserer TEXT-Datei in der GET-Version: 


230 

240 

250 

260 

270 

300 

300 

310 

320 

330 


OPEN 1,1,0,"ZAHLEN" ...für Band 
OPEN 1,8,3,"ZAHLEN,S,R" ...für Diskette 
INPUT#1,A,B,C,D 
PRINT A;B;C;D 
CL0SE 1 

Bei Zahlen dürfen wir in Zeile 320 ruhig Semikolons ver¬ 
wenden, da Zahlen von selbst Trennungsabstände haben. 

Basic-Befehl Nr. 38 iNPUT# 

-der INPUT#-Befehl liest, wie GET#, Daten einer mit 
OPEN eröffneten Datei externer Eingabegeräte 

- hinter INPUT# muß die Datei-Nummer des OPEN- 
Befehls stehen 

- während GET # Zeichen für Zeichen liest, holt INPUT# 
ganze Datengruppen 

-hinter einem INPUT#-Befehl können mehrere, durch 
Kommata getrennte Variable stehen 

- ein String darf nicht länger als 80 Zeichen sein 

- INPUT # kann nicht im Direkt-Modus verwendet werden 


10 OPEN 1,8,3,"TEXT,S,W" 
10 OPEN 1,1,1,"TEXT" 

20 F0R 1=1 T0 3 
30 READ A$ 

PRINT #1,A$ 

NEXT I 
CL0SE 1 

DATA FUSSBALL,TENNIS,* 
END 


i.für Diskette 
..für Band 


40 

50 

60 

70 

80 

90 


100 OPEN 1,8,3,"TEXT,S,R" ...für Diskette 
100 OPEN 1,1,0,"TEXT" ...für Band 

110 GET#1,A$ 

120 IF A$="* * THEN 130 
123 PRINT A$; 

125 GOTO 110 
130 CL0SE 1 

Ich habe die Zeile 120, die auf Datei-Ende prüft, leicht 
geändert. Sie prüft jetzt auf ein abschließendes Zeichen 
»*«, das ich als letzte Eintragung in die neue DATA-Zeile 70 
geschrieben habe. READ und PRINT#1 erfolgen nun 
innerhalb einer Schleife zwischen Zeile 20 und 50. 

Sie müssen leider wieder die Datei TEXT entweder 
löschen (Diskette) oder überschreiben (Band). Mit RUN 
läuft der Schreibteil des Programms bis Zeile 80. Mit RUN 
100 starten Sie den Leseteil. 

Den abspeichernden Teil (also Zeilen 10 bis 70) können 
wir natürlich auch für die Druckerausgabe verwenden. 
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Der OPEN-Befehl lautet dafür: 

210 OPEN 1,4 

Ab Zeile 220 können Sie die Zeilen 20 bis 70 vom oberen 
Programm übernehmen, indem Sie eine 2 vor die »alten« 
Zeilennummern eingeben. 

Das Programm sieht jetzt so aus: 

210 OPEN 1,4 
220 FOR 1=1 TO 3 
230 READ A$ 

240 PRINT #l,a$ 

250 NEXT I 
260 CLOSE 1 

270 DATA FUSSBALL,TENNIS,# 

Nach RUN druckt der Drucker die Wörter der DATA-Zeile 
aus. So einfach ist das. 

28.4. Kommandogewalt an das externe Gerät 

Basic bietet die Möglichhkeit an, mit »normalen« Befeh¬ 
len die angeschlossenen Geräte anzusteuern. Das beste 
Beispiel dafür ist der Befehl LIST. Wenn er normalerweise 
das im Programmspeicher des C64 stehende Programm 
auf dem Bildschirm auslistet, dann soll es möglich sein, mit 
LIST das Programm auch auf dem Drucker auszudrucken. 

Der Befehl dazu ist vom englischen Wort »Command« 
abgeleitet und heißt 

CMD Dateinummer 

In Anwendung sieht das, als Direktbefehl eingegeben, so 
aus: 

—► OPEN 1,4:CMD 1:LIST 

Jetzt gilt der LIST-Befehl nicht für den Bildschirm, son¬ 
dern für den Drucker. 

Um die Kommandogewalt wieder dem Bildschirm zu 
übertragen, muß die Verbindung zum Drucker gelöst wer¬ 
den mit: 64 ER or 

—+• PRINT #1: CLOSE 1 

Der CMD-Befehl kann auch mit einem Kommentar (wie 
beim INPUT-Befehl) versehen werden, den er im angespro¬ 
chenen Gerät »ausdruckt«. Im obigen Beispiel angewen¬ 
det: 

—► OPEN 1,4:CMD 1,"LISTING-NAME":LIST 

Dadurch wird zu Beginn des Listings die Überschrift 
LISTING-NAME ausgedruckt. 

Ein Programm im Speicher kann auch als sequentielle 
Datei auf die Diskette abgespeichert werden: 

—*• OPEN 1,8,2, "PROGRAMM-NAME,S,W" 

—► CMD 1: LIST 

Jetzt wird das Programm auf der Diskette »ausgeLISTet«, 
das heißt, es wird sequentiell gespeichert. 

—► PRINT #1: CLOSE 1 

Ausgelesen wird es in der schon beschriebenen Weise. 
Nicht nur LIST ist ein sinnvoller Befehl, auch PRINT kann 
anstelle von PRINT# verwendet werden. 

10 OPEN 1,4 
20 CMD 1 

30 PRINT"FUSSBALL" 

40 PRINT"TENNIS" 

50 CLOSE 1 

Damit werden die beiden Wörter FUSSBALL und TEN¬ 
NIS direkt auf dem Drucker ausgedruckt - mit PRINT ohne 

#J_ 

Basic-Befehl Nr. 40 CMD 

- er muß immer mit derselben Dateinummer versehen 
sein, mit der eine Datei durch OPEN eröffnet worden ist. 

- die dem CMD-Befehl folgenden Befehle (z.B. LIST oder 
PRINT) wirken dann auf das angewählte Gerät. 

- CMD kann, durch ein Komma getrennt und mit Anfüh¬ 
rungszeichen versehen, mit einem Kommentar versehen 
werden, der dann ausgedruckt oder gespeichert wird: 


CMD 1," KOMMENTAR" 

- die Wirkung von CMD kann auf 3 Arten aufgehoben wer¬ 
den: 

• CMD 3 (Gerätenummer des Bildschhirms) 

• PRINT# 

• STOP+RESTORE-Taste 


LEKTION 29: Ein Lied als Datei speichern 


Zum Schluß der Datei-Betrachtungen will ich mein Verspre¬ 
chen einlösen, das ich in Lektion 20 bei den zweidimensio¬ 
nalen Feldern gemacht habe. Ich will Ihnen nämlich zeigen, 
wie man Werte, die wir in Felder gelegt haben, abspei¬ 
chern, wieder laden und variieren kann. 

Dazu verwenden wir Listing 5, unser Programmbeispiel 
für zweidimensionale Felder. 

Wir wollen schrittweise Vorgehen. 

—► Laden Sie Listing 5 ein 
—► Fügen Sie folgende Zeilen dazu: 

500 REM- DATEI ABSPEICHERN - 

505 : 

510 OPEN 1,8,4,"LITERATUR,S,W" 

520 FOR S=1 TO D 
530 FOR K=1 TO 6 
540 PRINT# 1,A$(S,K) 

550 NEXT K:NEXT S 
560 

670 CLOSE 1 

Dieser Programmteil speichert, wie Sie nicht nur aus 
dem Titel, sondern auch aus dem W (write) nach dem 
OPEN-Befehl sehen können, das gesamte Feld A$ als 
Datei <• if Diskette ab. Für die Datasette muß lediglich Zeile 
510 geändert werden: 

510 OPEN 1,1,1,"LITERATUR" 

—► RUN 

Damit lassen wir das Programm laufen, wodurch die 
Datensätze der DATA-Zeilen in das Feld eingelesen wer¬ 
den. Der nachfolgende Suchteil des Programms wird jetzt 
nicht weiter gebraucht und kann durch ein falsches Such¬ 
wort und durch »N« bei der Wiederholungsfrage abgebro¬ 
chen werden. 

—*■ GOTO 500 (nicht RUN 500!) 

Genau wie RUN 500 setzt der Direktbefehl GOTO 500 
das Programm ab Zeile 500 fort, allerdings ohne die Varia¬ 
blen auf Null zurückzusetzen. Das ist wichtig, damit D sei¬ 
nen letzten, dem aktuellen Stand der Anzahl von Datensät¬ 
zen entprechenden Wert behält. Mit den Zeilen 500 bis 570 
wird das Feld als Datei abgespeichert. 

—► Löschen Sie alle DATA-Zeilen 

Wir brauchen sie nicht mehr, denn die Datensätze sind ja 
als Datei gespeichert. 

Um die Datei wieder in den Computer laden zu können, 
müssen wir den READ-Teil des Programm (Zeilen 110 bis 
170) umschreiben. Ich schreibe nur die Zeilen, die sich 
ändern: 

—► 115 OPEN 1,8,3,"LITERATUR,S,R" 

(115 OPEN 1,1,0"LITERATUR" für Datasette) 

140 INPUT# 1,A$(D,K) 

150 IF.A$(D,K)= .usw..:G0T0 180 

180 CLOSE 1 

Um das Einlesen der Datei »LITERATUR« ausprobieren 
zu können, müssen wir das noch im Speicher stehende 
Feld mit den Datensätzen löschen, am besten mit Aus- und 
Einschalten des Computers. Vorher aber speichern Sie auf 
alle Fälle das unfertige Programm, am besten als Listing 10 
A. 

—► Computer aus- und wieder einschalten 
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—► Listing 10 A wieder LQAÜen und mit RUN 
laufen lassen 

Der Suchvorgang wird Ihnen zeigen und beweisen, daß 
das Feld tatsächlich als Datei mit dem Namen »LITERA¬ 
TUR« auf der Diskette (Kassette) gespeichert ist. 

FAZIT 

1. der Direktbefehl RUN 500 setzt alle Variablen auf den 
Wert 0 zurück und beginnt das Programm ab Zeile 500 

2. der Direktbefehl GOTO 500 setzt das Programm eben¬ 
falls ab Zeile 500 fort, ohne aber die Variablen zu verän- 
dern 

LEKTION 30: 

Ein vollständiges Datei-Programm 


Für ein vollständiges Datei-Programm fehlen dem Listing 
10 A noch zwei Dinge: 

- ein Menü zur freundlichen Bedienung 

- eine Möglichkeit, die Datei zu erweitern 

Das Menü soll uns helfen, das ganze Programm, das ja 
schon fast vollständig ist, zu strukturieren. 

Das Menü ist genausoaufgebaut wie das Beispiel in Lek¬ 
tion 24. 

5 REM- MENUE - 

7 : 

10 PRINT CHR$(l47) 

15 PRINT SPC(90)"WAEHLEN SIE BITTE AUS" 

20 PRINT TAB(202)"(1) DATEN LADEN" 

25 PRINT SPC(82)"(2) DATENSAETZE SUCHEN" 

30 PRINT SPC(82)"(3) NEUEN TEXT EINGEBEN" 

35 PRINT SPC(82)"(4) DATEI ABSPEICHERN" 

40 PRINT SPC(82) "(5) ENDE" S^ER 

45 : 

50 PRINT 
55 INPUT A 

60 ON A G0SUB 100,200,400,500,600 
65 GOTO 10 

Wie gesagt, es ist dasselbe Menü wie vorher, nur der Text 
ist dem Datei-Programm angepaßt. Auch die Unterpro¬ 
gramm-Zeilennummern in Zeile 60 entsprechen dem Da¬ 
tei-Programm. 

Die einzelnen Unterprogramme, soweit sie bereits vor¬ 
handen sind, müssen mit RETURN abschließen. Das wol¬ 
len wir gleich nachholen: 

—► 190 RETURN 
340 RETURN 
580 RETURN 

Jetzt fehlen nur noch die Unterprogramme »NEUEN 
TEXT EINGEBEN« (ab Zeile 400) und »ENDE« (ab Zeile 
600) 

—*- 400 REM-NEUEN TEXT EINGEBEN- 

410 : 

420 K=1 

430 PRINT K". KATEGORIE":INPUT A$(D,K) 

440 IF K<6 THEN K=K+1:G0T0 430 

450 PRINT:PRINT"NOCH EINE EINGABE (J/N) ?" 

460 GET V$:IF V$="" THEN 460 
470 IF V$="J" THEN D=D+1:G0T0 410 
480 GOTO 500 

Dieses Unterprogramm ersetzt die Eingabe über DATA- 
Befehle. Die entscheidende Zeile ist Zeile 430. In ihr wird 
die Eingabe eines kompletten Datensatzes verlangt, wobei 
die 6 Kategorien numeriert einzeln aufgerufen werden. 
Diese Eingabe wird sofort einer Feldvariablen A$(D,K) 
zugewiesen. 

Das alles ist nur möglich, weil die Variable D, welche die 
Anzahl der Datensätze angibt, auch nach dem Suchpro¬ 


gramm wieder auf dem Endwert steht. Sie braucht bei der 
ersten Eingabe eines neuen Datensatzes nicht verändert 
werden, weil ihr höchster Wert nicht einen Datensatz, son¬ 
dern den Klammeraffen »@« gezählt hat. Der aber soll 
durch den neuen Datensatz überschrieben werden. 

Erst wenn in Zeile 470 die Frage nach einer weiteren Ein¬ 
gabe mit J(a) beantwortet wird, muß D um 1 erhöht werden. 
Wenn nach der Frage kein J(a) erfolgt, springt die Zeile 480 
auf das Unterprogramm »DATEI ABSPEICHERN«, damit 
die Eingabe nicht verlorengeht. 

Dieses Unterprogramm speichert die nunmehr vergrö¬ 
ßerte Datei natürlich wieder unter dem Namen »LITERA¬ 
TUR« ab. Eine Datei mit diesem Namen existiert aber 
schon auf der Diskette oder der Kassette. Deshalb muß bei 
Diskettenbetrieb in Zeile 510 die sogenannte »Save and 
Replace«-Funktion verwendet werden: 

—► 510 OPEN 1,8,4,:LITERATUR,S,W" 

Das Einfügen des Klammeraffen »@« gefolgt von einem 
Doppelpunkt bewirkt, daß die neue Datei die alte Datei des¬ 
selben Namens überschreibt. 

Bei Kassettenbetrieb wird die neue, vergrößerte Datei 
einfach neu geSAVEt. 

Und noch etwas fehlt: die Endmarkierung, die wir in Zeile 
150 abfragen und die durch die neue Eintragung über¬ 
schrieben worden ist. 

Sie muß am Ende des Unterprogramms, noch vor dem 
CLOSE-Befehl, per PRINT#-Befehl an die Datei ange¬ 
hängt werden: 

—► 560 PRINT #1,"@" 

Jetzt kommt nur noch das Unterprogramm »ENDE« ab 
Zeile 600 dazu, das aber denkbar einfach ist: 

600 REM-ENDE- 

610 END 

Das ko,, olette Programm ist in Listing 10 wiedergegeben. 

LEKTION 31: 

Die Booleschen Funktionen AND, OR, NOT 


ln Lektion 8 bei den Prüfungen habe ich als Prüfbedingun¬ 
gen neben den Vergleichsfunktionen auch die sogenann¬ 
ten Boole’schen Funktionen 

AND, OR und NOT 

erwähnt, ohne aber näher darauf einzugehen. Das will ich 
hier nachholen. Sie sind prinzipiell bei zwei Verfahren er¬ 
setzbar. 

31.1. Verwendung als Prüfbedingung 

Die Wirkungsweise kann am besten an einem Beispiel 
demonstriert werden. Ich nehme dazu aus Lektion 8 den 
vierten Anwendungsfall, bei dem wir zwei IF-THEN-Befehle 
hintereinander gesetzt haben: 

350 IF X=4 THEN IF Y=0 THEN PRINT "JA" 

Diese Zeile kann auch mit AND geschrieben werden: 

350 IF X=4 AND Y=0 THEN PRINT "JA" 

Die Wirkungsweise von AND entspricht seiner Überset¬ 
zung "UND". Erst wenn beide Bedingungen (X=4 und 
Y=0) erfüllt sind, wird die Aktion hinter dem THEN- 
Befehlsteil ausgeführt. 

Die OR-Funktion wirkt entgegengesetzt: 

350 IF X=4 0R Y=0 THEN PRINT "JA" 

Jetzt wird die Aktion nach THEN dann ausgeführt, wenn 
entweder die eine Bedingung (X=4) oder die andere (Y=0) 
oder beide erfüllt sind. Um das auszuprobieren, nehmen 
wir die gesamte verknüpfte Schleife, aus der die Zeile 350 
stammt. 

310 X=2:Y=1 

320 X=X+Y-2 
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2 REM++++++++ LITERATUR DATEI +++++++++ 

<196> 

260 

PRINT 

<108> 

3 : 

<235> 

270 

NEXT S 

<180> 

4 : 

<236> 

280 

PRINT"ENDE DER SUCHE” 

<165> 

5 REM-MENUE- 

<158> 

290 

PRINT 

<138> 

7 : 

<239> 

300 


<022> 

10 PRINT CHR$(147) 

<039> 

310 

PRINT"NOCH EINMAL (J/N)?" 

<064> 

15 PRINT SPC(90)"WAEHLEN SIE BITTE AUS” 

<223> 

320 

GET V$:IF V$="" THEN 320 

<182> 

20 PRINT TAB(202 >"(1> DATEI LADEN” 

<047> 

330 

IF V$="J" THEN 210 

<054> 

25 PRINT SPC<82> "(2) DATENSAETZE SUCHEN” 

<019> 

340 

RETURN 

<144> 

30 PRINT SPC(82) "<3> NEUEN TEXT EINGEBEN" 

<253> 

390 


<112> 

35 PRINT SPCC82) "(4) DATEI ABSPEICHERN" 

<003> 

400 

REM- NEUEN TEXT EINGEBEN . 

<029> 

40 PRINT SPC(82) "(5) ENDE" 

<021> 

405 


<127> 

45 : 

<021 > 

420 

K=1 

<123> 

50 PRINT 

<152> 

430 

PRINT K".KATEGORIE”:INPUT A$<D,K> 

<060> 

55 INPUT A 

<087> 

440 

IF K<6 THEN K=K+l=GOTO 430 

<246> 

60 ON A GOSUB 100,200,400,500,600 

<110> 

445 


<167> 

65 GOTO 10 

<243> 

450 

PRINT:PRINT”NOCH EINE EINGABE (J/N) ?' 

<231> 

90 : 

<066> 

460 

GET VS:IF V$="" THEN 460 

<099> 

100 REM-DATEI LADEN- 

<044> 

470 

IF' V$=”J" THEN D=D+1:G0T0 420 

<080> 

105 : 

<081 > 

480 

GOTO 500 

<186> 

110 DIM A$(100,6) 

<230> 

490 


<212> 

115 OPEN 1,8,3."LITERATUR,S,R" 

<250> 

500 

REM-.DATEI ABSPEICHERN- 

<220> 

120 D=D+1 

<003> 

505 


<227> 

130 FOR K=1 TO 6 

<119> 

510 

OPEN 1,8,4,LITERATUR,S.W" 

<217> 

140 INPUT81,A$(D,K) 

<064> 

520 

FOR S=1 TO D 

<072> 

150 IF A$(D,K)="@"THEN K=6:NEXT iOGOTO 180 

<049> 

530 

FOR K=1 TO 6 

<011> 

160 NEXT K 

<004> 

540 

PRINT81,A$(S,K> 

<051> 

170 GOTO 120 

<130> 

550 

NEXT K:NEXT S 

<085> 

180 CLOSE 1 

< 191 > 

560 

PRINT81, 

<070? 

190 RETURN 

<248> 

570 

CLOSE 1 

<073> 

195 : 

< 171 > 

580 

RETURN 

<130> 

200 REM- DATENSAETZE SUCHEN -. 

<093> 

599 


<067> 

205 : 

<iei> 

600 

REM-ENDE- 

<045> 

210 INPUT-STICHWORT";S$ 

<148> 

605 


<073> 

220 FOR S=1 TO D 

<024> 

610 

END 

<104> 

230 FOR K=1 TO 6 

<219> 




240 IF A$(S,K> =S$ THEN FOR Z=1 TO 6:PRINT 


© 64 

er 


A$(S,Z>:NEXT Z 

<162> 




250 NEXT K 

<094> 

Listing 10. Die Literatur-Datei 



330 Y=Y-X+3 

340 PRINT X;Y 

350 IF X=4 AND Y=0 THEN PRINT "JA" 

360 GOTO 320 

Das Resultat ist wie gesagt das gleiche wie in Lektion 8. 
Die Schleife druckt das JA nach dem fünften Umlauf aus. 

Wenn Sie in Zeile 350 die OR-Funktion verwenden, wird 
das JA schon nach dem dritten Umlauf und dann noch ein¬ 
mal nach dem fünften Umlauf ausgedruckt. 

Ich will Ihnen noch ein Beispiel zeigen: 

350 IF (X AND Y)=4 THEN PRINT "JA" 

Diese Bedingung wird offensichtlich überhaupt nicht 
erfüllt, denn das JA erscheint nicht. Steht dagegen in der 
Klammer 

350 IF (X OR Y)=4 THEN PRINT "JA" 

dann erscheint das JA und zwar nach dem fünften Umlauf 
bei Kombination X=4, Y=0. 

Sie sehen also, daß X AND Y nicht gleichbedeutend ist 
mit X + Y. Das Resultat der beiden Bedingungen ist auf 
Anhieb nicht verständlich. Das liegt daran, daß diese bei¬ 
den Funktionen die Variablenwerte im Dualsystem und da 
auch noch »Bit-weise« verarbeiten und zwar nach folgen¬ 
den Regeln: 

_und_ _ oder _ 

0 AND 0 = 0 0 OR 0 = 0 

0 AND 1=0 0 OR 1 = 1 

1 AND 0 = 0 1 OR 0 = 1 

1 AND 1 = 1 1 OR 1 = 1 

Ich gehe hier davon aus, daß Sie, das duale (oder auch 
binäre) Zahlensystem, das nur aus den Ziffern 0 und 1 auf¬ 
gebaut ist, kennen. Ich habe nämlich hier keine Gelegen¬ 
heit, darauf einzugehen. Wenn Sie es nicht kennen, dann 
bitte ich Sie in einem entsprechenden Computerbuch 
nachzulesen. 

Ir* 


Nach obigen Rechenregeln ergibt die Aufgabe 
4 AND 3 ergibt 0 
4 OR 3 ergibt 7 

Im Detail gerechnet sieht das nämlich so aus: 
4:0000 0100 
3:0000 0011 


AND:0000 0000 (entspricht 0) 

DOR:0000 0111 (entspricht 7) 

Jetzt können wir aus den Läufen der Zeilen 310 bis 350 
eine Ergebnistabelle machen, die wir auch verstehen kön¬ 
nen. 



X 

Y 

X = 4 AND Y = 0 

X=4 OR Y=0 

(X AND Y) = 4 

(X OR Y)=4 

Anfang 

2 

1 

nein 

nein 

nein (0) 

nein (3) 

1 .Lauf 

1 

3 

nein 

nein 

nein (1) 

nein (3) 

2.Lauf 

2 

4 

nein 

nein 

nein (0) 

nein (6) 

3. Lauf 

4 

3 

nein 

JA 

nein (0) 

nein (7) 

4.Lauf 

6 

1 

nein 

nein 

nein (1) 

nein (5) 

5.Lauf 

4 

0 

JA 

JA 

nein (0) 

JA (4) 

6-Lauf 

2 

1 

nein 

nein 

nein (0) 

nein (3) 

und so weitet 


Ganz rechts in der Tabelle stehen die nach den obigen 
Regeln sich ergebenden Werte in Klammern. 

Die dritte Boolesche Funktion 
NOT 

wird nur sehr selten verwendet. Auch sie verarbeitet die 
Werte bit-weise im Dualsystem und zwar vertauscht sie ein¬ 
fach jede 1 mit einer 0 und umgekehrt jede 0 mit einer 1. 
5: 0 0000 0101 
NOT 5: 1 1111 1010 

Diese resultierende Dualzahl 1111 1010 mit noch einer 
1 davor entspricht in der speziellen Rechenweise des C64 
der negativen Zahl -6. 
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Auch auf dieses Phänomen - es entsteht durch die spe¬ 
zielle Darstellung der negativen Zahlen im Dualsystem - 
gehe ich hier nicht näher ein, sondern gebe nur die Formel 
für NOT an: 

NOT X bedeutet -(X + 1) 

Sie sehen, eine solche Funktion läßt sich nicht ohne vor¬ 
bereitendes Kopfrechnen anwenden. Bei der Formel für 
NOT ist die Klammer sehr wichtig, bei den beiden rechten 
Bedingungen in der letzten Tabelle auch: 

IF (X AND Y) = 4 ist nicht dasselbe wie 

IFXAND Y = 4 

Probieren Sie es mit der verschachtelten Schleife aus ! 

31.2. Die Klammer-Regeln 

Wir müssen eine weitere Regel beachten, allerdings 
nicht nur bei den Boole’schen Funktionen, sondern auch 
bei den arithmetischen Funktionen. Anlaß zu dieser Regel 
bietet die Möglichkeit, in einer IF-Prüfung mehrere Funktio¬ 
nen abzufragen. Es ist, in Erweiterung zu dem was wir ja 
schon ausprobiert haben, durchaus zulässig, die folgende 
Bedingung zu machen: 

IF A = 1 AND B = 20R C = 3 THEN... 

Nur muß man beachten, daß diese Zeile so wirkt, als 
wäre sie mit den folgenden Klammern geschrieben: 

IF (A = 1 AND B = 2) OR C = 3 THEN... 

Es wird also zuerst die AND-Verknüpfung gebildet und 
erst dann die OR-Verknüpfung mit dem Resultat der Klam¬ 
mer. 

Dieselbe Zeile, wie folgt geschrieben, bringt ein anderes 
Resultat: 

IF A = 1 AND (B = 2 OR C = 3) THEN... 

Hier folgt die AND-Verknüpfung erst nach der OR- 
Verknüpfung. Die Klammern sind deswegen notwendig, 
weil die einzelnen Funktionen eine eigene »Hackordnung« 
haben, das heißt, sie haben verschiedene Prioritäten, die 
in der folgenden Tabelle dargestell sind. 

1. t Potenz 

2. Vorzeichenwechsel 

3. * / Multiplikation, Division (gleichberechtigt) 

4. + - Addition, Subtraktion (gleichberechtigt) 

5. < > = Vergleichsfunktionen (gleichberechtigt) 

6. AND 

7. NOT 

8. OR 

Um Schwierigkeiten zu vermeiden, ist es empfehlens¬ 
wert, im Zweifelsfall immer Klammern einzusetzen. 

31.3. Verwendung als Bit-Maske 

In Lektion 21 haben wir beim Stöbern im Speicher gese¬ 
hen, daß es Speicherzellen gibt, deren Inhalt die Arbeits¬ 
weise des Computers beeinflussen. Derartige Speicher¬ 
zellen nennen wir REGISTER. 

So schaltet zum Beispiel die Zahl 5 in das Register 53820 
gePOKEt die Farbe des Bildschirmspeichers auf Grün. In 
den meisten Registern des C64 übt ein einzelnes Bit oder 
Bitgruppen eine eigene Steuerfunktion aus. Als Beispiel 
führe ich das Register 53265 an: 


Bit-Nr. 

7 

6 

5 

4 

3 

2 

1 

0 

Stellenwert 

128 

64 

32 

16 

8 

4 

2 

1 


Bit 0-2: bestimmt den Wert der Zeilenverschiebung 

in Y-Richtung beim Smooth-Scrolling 
Bit 3: schaltet Zeilenzahl (0=24 Zeilen, 1=25 Zei¬ 

len) 

Bit 4: schaltet den Bildschirm (0=gelöscht) 

Bit 5: schaltet Hochauflösungsmodus 

(1=eingeschaltet) 


Bit 6: schaltet veränderten Hintergrund- 

Farbmodus (1=eingeschaltet) 

Bit 7: letztes Bit des Farbregisters 53266 

Diese einzelnen Funktionen des Registers 53265 wer¬ 
den Ihnen jetzt nicht allzuviel sagen. Wenn Sie mehr über 
dieses und noch andere Register wissen und lernen wol¬ 
len, dann verweise ich Sie auf den Aufsatz von Thomas 
Erhärt »Der leichte Umgang mit Sprites« im 64’er Sonder¬ 
heft 5/86 ab Seite 90. Ich will Ihnen aber zeigen, wie Sie mit 
Hilfe der Boole’schen Funktionen einzelne Bits eines Regi¬ 
sters setzen (auf 1) oder löschen (auf 0) können, ohne die 
anderen Bits zu beeinflussen. An sich ist es ganz einfach. 
Man nimmt nämlich nur den gegenwärtigen Inhalt des 
Registers - mit dem PEEK-Befehl - verknüpft ihn über die 
AND- oder OR-Funktion mit einer MASKE und POKEt das 
ganze wieder zurück in das Register. 

Was ist eine Maske und wie sieht sie aus? 

Bit setzen: 

Wenn wir zum Beispiel das 4. Bit des Registers - es hat 
den Stellenwert 16 - auf 1 setzen wollen, dann hilft uns die 
OR-Funktion als Maske. 

PEEK (53265) xxxx xxxx 
Maske für 4. Bit 0 0 0 1 0 0 0 0 

OR xxxl xxxx 

An der Stelle, wo in der Maske eine 1 steht, wird laut 
Rechenregel (siehe Abschnitt 31.1) durch OR das entspre¬ 
chende Bit auf 1 gesetzt, alle anderen Bits behalten ihren 
ursprünglichen Wert. 

Der Befehl dazu lautet: 

P0KE 53265,PEEK (53265) 0R 16 

Die Maske zum Setzen des 0. Bit und des 7. Bit schaut 
demnach so aus: 

•"".E 53265,PEEK (53265) 0R (128+1) 

Bit löschen: 

Die Methode ist dieselbe, nur verwenden wir jetzt die 
AND-Funktion als Maske. 

PEEK (53265) xxxx xxxx 
Maske für 4. Bit 1110 1111 

AND xxxO xxxx 

Überall dort, wo in der Maske eine 1 steht, bleibt laut 
Rechenregel mit AND der ursprüngliche Wert erhalten, nur 
das Bit mit einer 0 in der Maske wird ebenfalls auf 0 
»gelöscht«. 

Zur Berechnung der Zahl für die Maske wird einfach der 
Stellenwert des zu löschenden Bit von 255 abgezogen. 

Um Bit 4 zu löschen, lautet der Befehl: 

P0KE 53265,PEEK (53265) AND (255-16) 

LEKTION 32: Die arithmetischen 
und geometrischen Funktionen 


Diese Funktionen, hinter denen immer in Klammern ein 
sogenanntes Argument steht, führen mit dem Argument 
eine bestimmte Berechnung durch. 

Alle derartige Funktionen des C64 finden Sie auch auf 
einem Schultaschenrechner. Ich werde deshalb - Ihr Wis¬ 
sen voraussetzend - hier nur eine Übersicht geben. 

SIN (X) 

- berechnet den Sinus von X, wobei das Argument X im 
Bogenmaß angegeben wird 

- wird das Argument in Grad angegeben, so muß folgende 
Formel verwendet werden: 

SIN (X*7i/180) 

7r erzeugen Sie durch die Tastenkombination <SHIFT> 
und < t > 
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Das folgende Beispiel druckt eine senkrechte Sinus¬ 
kurve aus: 

10 PRINT CHR$(l47) 

20 FOR X=0 TO 6 STEP 0.29 
30 A=INT(20+18#SIN(X)) 

40 PRINT TAB(A); 

50 NEXT X 
60 END 

COS (X) 

- berechnet den Kosinus von X, wobei das Argument X im 
Bogenmaß angegeben wird 

- wird das Argument in Grad angegeben, so muß folgende 
Formel verwendet werden: 

COS (X* ti/180) 

Das folgende Beispiel druckt eine senkrechte Kosinus¬ 
kurve aus: 

110 PRINT CHR$(l47) 

120 FOR X=0 T0 6 STEP 0.29 
130 A=INT(20+18#C0S(X)) 

140 PRINT TAB(A); 

150 NEXT X 
160 END 
TAN (X) 

- berechnet den Tangens von X, wobei das Argument X im 
Bogenmaß angegeben wird 

- wird das Argument in Grad angegeben, so muß folgende 
Formel verwendet werden: 

TAN (X* ti/180) 

ATN (X) 

- berechnet den Arcustangens von X, wobei das Argument 
X im Bogenmaß angegeben wird 

- wird das Argument in Grad angegeben, so muß folgende 
Formel verwendet werden: 

ATN (X*7i/180) 

ABS (X) 

- liefert den Absolutwert des Arguments X, das heißt, posi¬ 
tive Werte bleiben unverändert, negative Werte werden in 
positive Werte umgewandelt 

Im folgenden Beispiel wird geprüft, ob eine eingegebene 
Zahl positiv oder negativ ist durch Division der Zahl mit 
ihrem absoluten Wert. 

210 INPUT X 

220 IF X/ABS(X) =-l THEN PRINT "NEGATIV" 

230 IF X/ABS(X) =1 THEN PRINT "POSITIV" 

240 END 


EXP (X) 

- liefert den »natürlichen Exponenten« der Zahl X, oder in 
Worten ausgedrückt: 

e hoch X 

(e=2.71828183.. und ist die Basis des natürlichen Loga¬ 
rithmus) 

- EXP ist die Umkehrfunktion von LOG. 

LOG (X) 

- liefert den »natürlichen Logarithmus« (mit Basis e) der 
Zahl X, die immer positiv sein muß 

- LOG ist die Umkehrfunktion von EXP. 

SGN (X) 

- liefert das Vorzeichen des Arguments X. 

- die Funktion kann nur die Werte 1, 0 oder -1 annehmen 
nach folgender Regel: 

bei X = 0 SGN(X)=0 
bei X < 0 SGN(X)=-1 
bei X > 0 SGN(X)=1 
SQR (X) 

- berechnet die Quadratwurzel der Zahl X. X muß immer 
positiv sein 

- SQR ist die Umkehrfunktion zum Potenzieren mit 12 
Im Grunde genommen gehören die Funktinen INT und 

RND auch in diese Gruppe. Wir haben sie aber bereits in 
Lektion 10 »Zufalls- und ganze Zahlen« im Detail behandelt. 


LEKTION 33: Selbsldefinierte Funktionen 


Wem die bisher vorgestellten Funktionen, die uns Basic 
bietet, nicht genügen, dem erlaubt Basic seine eigenen 
>nen zu definieren. 

ein derartiger Wunsch durchaus Vorkommen kann, 
will ich Ihnen an einigen Beispielen zeigen. 

(1) Die Fläche F eines Kreises wird berechnet mit 

F=R’R*7r 

(2) Die Oberfläche O einer Kugel wird berechnet mit 

0=R*R*tt*4 

(3) Das Volumen eines Kegels mit kreisförmiger Grundflä¬ 
che wird berechnet mit 

V=R*R*7r*h/4 

Der Ausdruck R* R * Pi kommt also recht häufig vor. Wenn 
Sie jetzt die Aufgabe hätten, für 50 verschiedene Werte des 
Radius R - R(1) bis R(50) - die entsprechenden Flächen F(1) 
bis F(50) auszurechnen, dann müßten Sie den Ausdruck 
R*R*tt recht oft verwenden. 

Hier lohnt es sich also, dafür eine eigene Funktion zu 
»erfinden« und ihr einen Namen zu geben, dem man dann 
wie einer Variablen die verschiedenen Werte zuordnen 
kann. 

Dazu gibt es in Basic den Befehl 
DEF FN 

(abgeleitet aus DEFine FunktioN). 

In unserem obigen Beispiel können wir eine Funktion 
definieren, der wir den Namen RRPI geben wollen: 

DEF FN RRPI(R) = R*R*tt 
I n allen obigen Formeln können wir nun schreiben: 
F=FN RRPI(R) 

0=FN RRPI(R)*4 
V=FN RRPI(R)*h/4 

Der eigentliche Pfiff bei dieser selbstdefinierten Funktion 
liegt in der Eigenschaft der Variablen in der Klammer, in 
unserem Fall ist es das R. Diese Variable ist nämlich »über¬ 
tragbar«. Was heißt das? 

Wenn wir unsere selbstdefinierte Funktion FN RRPI so 
verwenden: 

X=23+FN RRPI(R)-3 

dann lautet die Funktion: R*R*7 t 
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Schreiben wir aber: 

X=23+FN RRPI(K1)-3 
dann lautet die Funktion: Kl *K1 * 7 r 
Die Zuordnung geschieht innerhalb des DEF-Befehls. 
Leider ist es nicht möglich, mehr als eine deartige übertrag¬ 
bare Variable zu verwenden. Schauen Sie sich das fol¬ 
gende Beispiel an: 

10 X=20 

, 20 DEF FN Z(R) = 10*INT(2*R+X) 

30 X=0.5 

40 PRINT FN Z(3.1) 

In Zeile 20 haben wir in der Formel 2 Variable, R und X. 
Aber nur R ist als Argument in der Funktion FN Z enthalten. 
Ihr weisen wir in Zeile 40 den Wert 3.1 zu. 

X ist die andere Variable, die vor der Definition der Zeile 
20 auf den Wert 20 gesetzt wird. Nach der Definition erhält 
sie aber den Wert 0.5 (Zeile 30). Und nur das ist der Wert, 
der in der Berechnung der Zeile 40 verwendet wird: 
10*INT(2*3.1+0.5) = 10*INT(6.7) 

= 10*6 
= 60 

Als Einschränkung gilt übrigens, daß man mit DEF FN 
nur numerische Funktionen definieren darf. Strings haben 
da keinen Platz. 


Basic-Befehl Nr. 41 DEF FN 

- der Befehl wird so geschrieben: 

DEF FN Name(Variable) = Formel 

- mit diesem Befehl können eigene komplizierte numeri¬ 
sche Funktionen mit einem kurzen Namen definiert 
werden 

- der Name der Funktion beginnt immer mit FN 

- der jeweilige Wert der in Klammern stehenden numeri¬ 
schen Variablen wird überall in der Formel eingesetzt, 
wo die Variable steht 

- die Funktion wird nach der Definition aufgerufen mit: 

Basic-Befehl FN Name () 

- DEF FN darf nicht im Direktmodus verwendet werden, 
String-Variable sind nicht zugelassen 


Neben den wenigen mathematischen Funktionen, die in 
Lektion 33 aufgeführt sind, gibt es viele andere, die so wich¬ 
tig sein können, daß Commodore im Handbuch fürden C64 
auf Seite 140 eine eigene Tabelle dafür angelegt hat. 

Diese Funktionen, die in Basic nicht vorhanden sind, eig¬ 
nen sich natürlich ideal für die Selbstdefinition: 
Arcussinus: 

DEF FN ARCSIN(X)=ATN(X/SQR(1-Xt2)) 

Sinus Hyperbolikus: 

DEF FN SINH(X)=(EXP(X)-EXP(-X))/2 

Interesant ist übrigens, daß es uns durchaus erlaubt ist, 
eine selbstdefinierte Funktion als Variable (Argument) 
einer zweiten selbstdefinierten Funktion zu verwenden. 

Als Beispiel wähle ich die Formel für das Volumen einer 
Kugel, deren Ergebnisse ich mit einer anderen Funktion 
auf 2 Dezimalstellen aufrunde. 

Funktion für das Kugelvolumen 
10 DEF FNV(R)=4*tt*RI3/3 
Funktion zum Aufrunden 

20 DEF FNA(X)=INT((X+0.005)*100)/100 
Der Rest des Programms lautet: 

30 INPUT "RADIUS";R 
40 PRINT FNV(R); 

50 PRINT FNA(FNV(R)) 

60 GOTO 30 

Mit diesen kleinen Programm wird in Zeile 40 zuerst das 
dem eingegebenen Radius entsprechende Volumen der 
Kugel ausgedruckt und mit dem Semikolon danebenge¬ 


setzt, danach durch Zeile 50 der aufggerundete Wert. 
Dabei ist einfach die Volumenfunktion FN V an die Stelle der 
Variable X gesetzt worden. 


LEKTION 34: fehlercuche 


Beim Programmieren gilt ein beinahe ehernes Gesetz: 
Kein Programm läuft auf Anhieb! 

Wie oft haben Sie schon geflucht und gesucht? 

Es gibt aber einige Tips und Tricks, wie man sich das 
Suchen der Fehler erleichtern kann. 

Fehlermeldungen 

Die häufigsten Fehler treten durch Tippfehler beim Ein¬ 
geben eines Programms auf. In vielen Fällen reagiert das 
Ubersetzungssystem des Computers mit einer Fehlermel¬ 
dung, die aber oft nicht verständlich ist. Ehe Sie sich mit 
den dürftigen Erklärungen des Commodore-Handbuches 
herumschlagen, ist es besser, Sie besorgen sich das 64’er 
Sonderheft 5/86. Dort hat der Redakteur Achim Hübner alle 
Fehlermeldungen zusammengetragen und anhand von 
guten Beispielen erklärt. Es lohnt sich schon, die Bedeu¬ 
tung der Fehlermeldungen zu kennen. 
Programmunterbrechung 

Wenn ein Programm etwas anderes tut, als Sie wollen, ist 
noch lange nicht klar, wo der Fehler liegt. Um das herauszu¬ 
finden, ist es empfehlenswert, nur Teile des Programms 
laufen zu lassen. Das geht aber meistens nur vom Anfang 
an - also halten Sie am besten das Programm an ganz 
bestimmten Stellen an. Wenn es bis dahin nichts falsch 
gemacht hat, dann haben Sie den Bereich, in dem der Feh¬ 
ler lieber muß, schon beachtlich eingeschränkt. 



Zum Anhalten eines Programms gibt es bekanntlich den 
Befehl END, durch den das Programm abbricht und der 
Computer sich mit READY meldet. 

Es gibt aber noch einen zweiten derartigen Befehl: 

STOP 

der wie END auch das Programm abbricht, aber mit der 
Meldung 

BREAK IN xxx 

die Zeile xxx angibt, wo der STOP-Befehl steht. 

Durch diesen Stopp werden die Werte der Variablen nicht 
verändert und sie können mit einem Direktbefehl ausge¬ 
druckt und überprüft werden. Ich komme gleich darauf 
noch zurück. 

Wichtig ist es, daß das gestoppte Programm in der nach 
dem STOP kommenden Zeile fortgesetzt werden kann, mit 
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GOTO yyy, wenn man die Zeilennummer yyy kennt, oder 
aber mit dem neuen Basic-Befehi 

CONT 

was aus dem englischen Wort Continue abgeleitet ist. Vor¬ 
aussetzung für das Funktionieren dieses Befehls ist aller¬ 
dings, daß vorher keine Änderungen im Programm vorge¬ 
nommen worden sind. 

Wenn Sie aber nach dem STOP geLISTet und einen Feh¬ 
ler korrigiert haben, müssen Sie mit RUN wieder von vorn 
anfangen. 

Im Extremfall können Sie in jede Programmzeile ein 
STOP einbauen und mit CONT zeilenweise das Programm 
durchgehen, bis Sie zu der kritischen Stelle kommen. 

Am Ende, wenn alles läuft, müssen Sie natürlich alle 
STOPs wieder entfernen. 

Variable ausdrucken 

Eine Fehleranalyse ist oft dadurch möglich, daß man 
sieht, welche Werte die verschiedenen Variablen im Lauf 
eines Programms annehmen. 

Einige zusätzliche PRINT-Befehle, zum Beispiel inner¬ 
halb einer Schleife, verschandeln zwar den gewünschten 
Ausdruck auf dem Bildschirm, geben aber Auskunft und 
Einsicht über den Ablauf und was da so passiert. 

Wie oben schon erwähnt, kann man nach einem STOP 
und ohne ein späteres CONT zu stören, mit PRINT im 
Direktmodus (also ohne Zeilennummern) den aktuellen 
Wert einer oder mehrerer Variablen ausdrucken. 

Eine etwas seltenere Art der Variablenbehandlung bietet 
uns ein weiterer Basic-Befehi 

CLR 

der von CLEAR, also Löschen abgeleitet ist. 

Vorsicht! der Befehl CLR hat nichts mit der CLR-Taste 
gemein. 

CLR bezieht sich in seiner »Lösch«-Funktion nur auf den 
Speicher, während die CLR-Taste den Bildschirm löscht. 
Mit dem CLR-Befehl werden alle numerischen Variablen¬ 
werte auf 0 gesetzt, allen Stringvariablen wird ein »Null¬ 
string« zugewiesen und alle Dimensionen von Feldern wer¬ 
den gelöscht. Wenn DATA-Zeilen vorhanden sind, die ganz 
oder teilweise gelesen wurden, wird die Funktion von 
RESTORE ausgeführt. Schließlich werden im RAM- 
Speicher des Betriebssystems alle vom Programm einge¬ 
stellten Werte auf ihren Zustand nach dem Einschalten des 
Computers zurückgesetzt. 

Nurzwei Dinge bleiben unberührt- und das ist sehr wich¬ 
tig: das im Speicher befindliche Programm und Datei- 
Befehle (OPEN). 

Die Funktion von CLR wird übrigens auch bei jedem 
RUN-, LOAD- und NEW-Befehl ausgeführt. 

Der CLR-Befehl kann sehr nützlich sein, um sozusagen 
die Ausgangslage eines Programms innerhalb eines 
Programm-Ablaufes wieder herzustellen. 


Basic-Befehi Nr. 42 STOP 

- dieser Befehl bricht ein Programm ab 

- im Unterschied zum END-Befehl meldet sich der Compu¬ 
ter nach dem STOP-Befehl mit der Meldung BREAK IN 
xxx, wobei mit xxx die Zeilennummer angegeben wird, in 
der das Programm abgebrochen worden ist 

Basic-Befehi Nr. 43 CONT 

- mit diesem Direktbefehl kann man ein gestopptes Pro¬ 
gramm, an dem nach dem STOP keine Veränderungen 
vorgenommen sein dürfen, ab der STOP-Stelle weiterlau¬ 
fen lassen. Die entsprechende Zeilennummer braucht 
nicht angegeben zu werden. Alle Werte der Variablen 
bleiben erhalten 

Basic-Befehi Nr. 44 CLR 

- dieser Befehl löscht die Werte aller Variablen und Dimen¬ 


sionen von Feldern. Numerische Variable erhalten den 
Wert 0, String-Variable einen Nullstring. Der Zeiger von 
READ-DATA-Befehlen wird auf die erste DATA-Zeile 
gesetzt. 

- der Zustand von eröffneten Dateien und ein im Speicher 
stehendes Programm bleiben unberührt. 


LEKTION 35: Seltene Basic-Befehle 


ln dieser letzten Lektion will ich die Befehle 
WAIT, SYS, USR 

und die reservierte Status-Variable 

ST 

behandeln. 

Diese vier Kandidaten sind nicht umsonst selten anzu¬ 
treffen, verlangen doch alle außer WAIT ein fortgeschritte¬ 
nes Wissen der Programmierung. 

Ich bin mir klar darüber, daß für einen derartigen Einfüh¬ 
rungskurs in Basic SYS, USR und ST zu schwer sind. Ich 
bringe aber dieses Kapitel der Vollständigkeit halber und 
entschuldige mich gleich, daß ich es nicht für Einsteiger 
schreiben kann. 

53.1. Der WAIT-Befehl 

Normalerweise, wenn in einem Programm gewartet wer¬ 
den soll, verwenden wir eine GET-Schieife vom Typ: 

10 GET A$:IF A$="" THEN 10 

In Basic gibt es aber einen - viel zu selten verwendeten 
- Befehl, der die Programmausführung solange unter¬ 
bricht, bis in einer angegebenen Adresse des Speichers 
etwas verändert wird. Er lautet: 

.ina*» WAIT 

Hinter dem WAIT-Befehl, der übersetzt Warten heißt, 
muß die Adresse einer beliebigen Speicherzelle stehen, in 
der etwas passieren soll. Zusätzlich folgen auf die Adresse, 
durch Komma getrennt, eine oder zwei numerische Varia¬ 
ble. Was das alles soll, zeigt am besten ein Beispiel. 

In Lektion 9 »Eingabe« habe ich den Tastaturpuffer 
beschrieben, in den Zahlen und Zeichen abgespeichert 
werden, wenn ihre Tasten während des Programmlaufs 
gedrückt werden. 

In der Speicherzelle 198 nun steht immer die aktuelle 
Zahl der im Tastaturpuffer gespeicherten Zeichen. 

100 P0KE 198,0 

Mit dieser Zeile wird »künstlich« der Puffer geleert. 

110 WAIT 198,1 

Dieser Befehl unterbricht das Programm solange, bis 
irgendeine Taste gedrückt worden ist, wodurch natürlich in 
Speicherzelle 198 eine 1 steht. 

Ein anderes Beispiel bietet die Speicherzelle 653. Sie 
enthält eine Zahl, die angibt, welche der Steuertasten 
SHIFT, CTRL oder CBM gedrückt worden ist und zwar: 
SHIFT = 1 
CBM = 2 
CTRL = 4 

Auch diese Tasten können wir mit WAIT abfragen: 

200 PRINT "A" 

210 WAIT 653,4 

230 GOTO 200 

Mit diesen drei Zeilen wird zuerst ein A ausgedruckt, 
dann wartet Zeile 210 auf die CTRL-Taste und druckt, 
solange sie gedrückt ist, lauter A auf den Bildschirm. Um 
zu erreichen, daß pro Tastendruck nur ein einziges A aus¬ 
gedruckt wird, fügen wir Zeile 220 ein: 

220 WAIT 653,4,4 

Was da passiert, bedarf einer nicht sehr leicht verständli¬ 
chen Erklärung, die in der Befehlsbeschreibung steht. 
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Basic-Befehl Nr. 45 WAIT 

- Er wird so geschrieben: 

WAIT Adresse,NI,N2 

- Er unterbricht ein Programm solange, bis der Inhalt der 
mit der Adresse angegebenen Speicherzelle von Null 
verschieden ist. 

- Die Veränderung des Inhalts der adressierten Speicher¬ 

zelle wird durch die beiden numerischen Variablen Ni 
und N2 erzeugt, und zwar dadurch, daß zuerst der Inhalt 
der Speicherzelle mit N2 über ein EXOR verknüpft wird. 
Dieses Ergebnis wird dann mit NI über ein AND ver¬ 
knüpft. v 

Ist das Resultat ungleich 0, bleibt das Programm unter¬ 
brochen. 

Ist das Resultat gleich 0, fährt das Programm mit dem 
nächsten Befehl fort. 

- N2 kann auch weggelassen werden. Dann wird es auto- 
matisch auf 0 gesetzt. 


Um diese Berechnung zu verstehen, muß ich zuerst die 
Boole’sche Funktion EXOR erklären, die leider im C64 
nicht für den generellen Gebrauch eingebaut ist. 

Ähnlich wie das in Lektion 31 beschriebene OR gilt für 
das XOR folgende Verknüpfungsregel: 

0 XOR 0 = 0 
0 XOR 1 = 1 
1 XOR 0 = 1 
1 XOR 1 = 0 

Betrachten Sie bitte nochmal die Zeilen 200 bis 230. 


210 WAIT 653,4 


Inhalt 653 = 0 

0000 

N2 =0 

0000 

XOR 



0000 

NI =0 

0000 

AND 


Ergebnis 

0000 

das heißt, das Programm wartet. 


Wenn die CTRL-Taste gedrückt wird, steht in 653 eine 4. 
Die obige Rechnung ergibt 4 und das Programm läuft wei¬ 
ter. 


Dieselbe Rechnung für Zeile 220 sieht so aus: 
220 Wait 653*4,4 

Inhalt 653 = 4 0100 

N2 =4 0100 

XOR - 

0000 

NI =4 0100 

AND - 

Ergebnis 0000 

das heißt, das Programm wartet wieder. 


Die meisten dieser Routinen benötigen jedoch verschie¬ 
dene Angaben - man nennt sie auch Parameter - die vor 
der Ausführung des SYS-Befehls richtig eingestellt sein 
müssen. 

Die LOAD-Routine zum Beispiel, die ab Speicherzelle 
62622, beginnt, können wir mit 
SYS 62622 

nicht starten. Es fehlen die Angaben über Geräte- 
Nummer (8 für Floppy, 0 für Band), File-Namen, sowie 
Anfangs- und Endadresse. Diese Parameter werden nor¬ 
malerweise nach dem Befehl LOAD von der Routine des 
Interpreters, die den LOAD-Befehl übersetzt, eingegeben. 
Wir geben ja nicht einfach LOAD ein, wenn wir ein Pro¬ 
gramm mit dem Namen »TEST« auf Diskette speichern wol¬ 
len, sondern wir schreiben 
LOAD "TEST",8 

Auch wenn wir nur LOAD eintippen, werden vom Über¬ 
setzter Parameter gesetzt, nämlich »namenlos« und 0 für 
Bandgerät. Ich hoffe, Ihnen ist geläufig, daß bei Weglassen 
aller Angaben der Übersetzter immer Kassettenoperatio¬ 
nen durchführt. 

Natürlich können wir uns das anschauen: Die Routine 
des Übersetzters für den BASIC-Befehl LOAD beginnt an 
Speicherzelle 57704 . 

Mit SYS 57704 springen wir dorthin - und in der Tat, wir 
erhalten auf dem Bildschirm PRESS PLAY ON TAPE. Aber 
ein Programm auf diese Weise auf die Floppy zu LOADen, 
gelingt uns nicht, es sei denn, wir können die fehlenden 
Parameter von Hand eingeben. 

Genau das aber können wir, weil der SYS-Befehl sich 
diese Parameter aus den Speicherzellen 780 bis 783 holt 
und in die vier Register des Mikroprozessors schreibt. 
780 ist die Adresse des Akkumulators 
mm 9 . Adresse des X-Registers 

782 ist oie Adresse des Y-Registers 

783 ist die Adresse des P-Registers. 

Die Behandlung von A, X und Y ist unkompliziert, wie wir 
gleich sehen werden. 

Das P-Register ist nicht so einfach zu verwenden, da es 
nicht Zahlenwerte, sondern Flaggen (Bitmuster) enthält. Im 
einzelnen bedeuten im P-Register: 


BIT Nr. 

WERT 

FLAGGE 

ABKÜRZUNG 

0 

1 

Übertrag 

C(arry) 

1 

2 

Null 

Z(ero) 

2 

4 

Unterbrechung 

l(nterrupt) 

3 

8 

Dezimal 

D 

4 

16 

Abbruch 

B(reak) 

5 

32 

nicht benutzt 


6 

64 

Überlauf 

V 

7 

128 

Vorzeichen 

N(egativ) 


35.2. Der SYS-Befehl 

Sowohl eigene Programme, die in Maschinensprache 
geschrieben sind und daher im RAM-Speicher stehen, als 
auch Programmteile (Routinen) des Betriebssystems und 
des Basic-Übersetzers, die im ROM-Speicher stehen, kön¬ 
nen von einem Basic-Programm aus gestartet (aufgerufen) 
werden. Dieser Befehl entspricht damit dem RUN-Befehl 
für Basic-Programme. Er wird so geschrieben: 

SYS Adresse 

Wichtig ist, daß am Ende der mit SYS gestarteten 
Maschinensprache-Routine ein RTS-Befehl steht, durch 
den die Programmkontrolle wieder an das Basic- 
Programm zurückgegeben wird. Ein Beispiel dafür ist 
SYS 58260 

der Sprung auf den Kaltstart, der den Computer in die Aus¬ 
gangslage zurücksetzt. 


Um eine der Flaggen des P-Registers zu löschen, emp¬ 
fiehlt es sich, das ganze Register mit POKE 783,0 zu 
löschen. Umgekehrt muß man beim Setzen der Bits sehr 
aufpassen wegen der Unterbrechungsflagge I. Eine 1 in I 
entspricht dem Maschinen-Befehl SEI, der alle Interrupts 
ausschaltet, auch die der Tastatur-Abfrage, was natürlich 
sehr störend sein kann! Um alle Flaggen außer der Unter¬ 
brechungsflagge I zu setzten, muß POKE 783,247 eingege¬ 
ben werden. 

So, jetzt aber wird es Zeit für ein Beispiel, wie vor dem 
SYS-Befehl Parameter eingegeben werden können. In der 
Literatur wird immer das Beispiel gewählt, den Cursor auf 
eine bestimmte Position zu setzen, beziehungsweise seine 
Position abzufragen. Dazu gibt es eine Routine, die bei bei¬ 
den Rechnern ab Speicherzelle 65520 beginnt. 

Sie nimmt die Zahl, die im X-Register steht, und verwen¬ 
det sie als Zeilennummer; die Zahl des Y-Registers nimmt 


110 


SONDERHEFT 19 













C64 


GRUNDLAGEN 


sie als Spaltennummer, setzt dann den Cursor an diese 
Stelle und bringt die beiden Werte in die Speicherzellen 
209/210 und 211. 

Unser Beispiel hat die Aufgabe, den Cursor in die 
4. Spalte der 7. Zeile zu setzen, dort das Dollar-Zeichen 
hinzuschreiben und es rot zu färben. 

5 PRINT CHR$(l47) 

10 POKE 783,0 
20 POKE 781,6 
30 POKE 782,3 
40 SYS 65520 

Nach Löschen des Bildschirms werden zuerst alle Flag¬ 
gen des P-Registers gelöscht (Zeile 5). Dann kommt die 
Zeilennummer in das X-Register (Zeile 10) und die Spalten¬ 
nummer in das Y-Register (Zeile 30). Nach dem Eingeben 
dieser Parameter können wir mit SYS auf die Routine sprin¬ 
gen. 

50 ZEILE=PEEK(209)+256#PEEK(210) 

60 ADRESSE = ZEILE + PEEK(211) 

70 POKE ADRESSE,36 

In den Speicherzellen 209/210 können wir jetzt (zur 
Übung) die Zeilennummer ablesen. Die Adresse der Cur¬ 
sorposition im Bildschirmspeicher erhalten wir durch die 
Addition der Zeilennummer mit dem Inhalt der Speicher¬ 
zelle 211. Dorthin POKEn wir den Bildschirmcode des Dol¬ 
larzeichens, nämlich 36 (Zeile 70). 

80 SYS 59940 

90 FARBE-PEEK(243)i256xPEEK(244) 

100 POKE FARBE+PEEK(211),2 

Für das Färben des Dollarzeichens verwenden wir eine 
weitere Routine des Betriebssystems, die ab 59940 - beim 
VC-20 ab 60082 - beginnt. Sie ermittelt die Zeilenposition 
des Cursors im Farbspeicher und bringt diesen Wert in die 
Speicherzellen 243/244, wo wir ihn abfragen können (Zeile 
90). Die Adresse der Cursorposition im Farbspeicher setzt 
sich aus diesem Wert plus der Spaltennummer zusammen, 
die wir wieder der Speicherzelle 211 entnehmen. Auf die¬ 
sen Platz POKEn wir den Farbcode 2 für Rot (Zeile 100). 

So leicht ist das, wenn man die Routinen und die Aufga¬ 
ben der Speicherzellen kennt. 


Basic-Befehl Nr. 46 SYS 

- der SYS-Befehl startet ein Maschinenprogramm, das an 
der hinter dem SYS-Befehl stehenden Adresse beginnt. 

- werden mit dem SYS-Befehl Routinen des Betriebssy¬ 
stems aufgerufen, die aber einige Parameter bei der Aus¬ 
führung brauchen, können diese über die Speicherzellen 
780 bis 783 vor dem SYS-Befehl eingegeben werden 


35.3. Der USR-Befehl 

Ohne Zweifel gehört auch dieser Befehl zu den Mauer¬ 
blümchen von BASIC, obwohl sein Name - eine Abkürzung 
von User (Verwender) - eigentlich genügend Anreiz bieten 
müßte. 

USR hat im Grund genommen dieselbe Funktion wie 
SYS. Er springt nämlich aus einem Basic-Programm direkt 
in ein Maschinen-Programm, arbeitet dieses so lange ab, 
bis er den Befehl RTS findet. RTS entspricht dem Basic- 
Befehl RETURN und springt in das Basic-Programm 
zurück. 

Bei SYS steht die Sprungadresse gleich hinter dem 
Befehl. 

Bei USR muß die Sprungadresse zuerst in die Speicher¬ 
zellen 785/786 gePOKEt werden. 

Beispiel: Sprung auf 56524 
mit SYS: SYS 56524 

mit USR: POKE 785,204 (204+256*220=56524) 

POKE 786,220 
X=USR(Y) 


Kein Wunder, daß USR selten benutzt wird - ist er doch 
durch das POKEn der Sprungadresse in Low-/High-Byte 
Darstellung aufgebläht. 



Das ist aber nicht unnütz, weil USR mehr Fähigkeiten hat 
als SYS. Im Hinblick auf die im Abschnitt 35.2. »Der SYS- 
Befehl« aufgezeigten Möglichkeiten des SYS-Befehls sollte 
ich besser sagen: 

USR hat andere Fähigkeiten als SYS. 

USR ist eine Mischung von SYS und FN. Letzterer ist der 
BASIC-Befehl zur Definition selbsterfundener Funktionen 
(Lektion 33). 

Bei USR allerdings wird die Funktion als Unterprogramm 
in Maschinensprache geschrieben, auf die dann wie 
gesagt der USR-Befehl zur Ausführung springt. Der Pfiff 
dabei ist aber, daß Zahlenwerte in das Maschinenpro¬ 
gramm mitgenommen beziehungsweise Resultate aus ihm 
herausgeholt werden können. 

Wie läuft das ab: Das Argument Y, das in der Klammer 
hinter dem Befehl steht, wird zuerst in den Gleitkomma- 
Akkumulator Nr. 1 (FAC1) in den Speicherzellen 97 bis 102 
gebracht. Als Gleitkommazahl wird es vom angesprunge¬ 
nen Maschinenprogramm weiterverarbeitet. Das Resultat 
kommt dann wieder in den FAC 1 und steht als Wert von X 
zur Verfügung. 

Das Argument Y kann übrigens auch ein komplexer Aus¬ 
druck sein, zum Beispiel: 
X=USR(PEEK(A)+256*PEEK(B)) 

Ich möchte das an einem kleinen Beispiel demonstrie¬ 
ren. 

Statt allerdings ein Maschinenprogramm selbst zu 
schreiben, verwende beziehungsweise springe ich auf 
eine Routine des Betriebssystems, die den Inhalt des FAC 
1 für mathematische Operationen verwendet. 

Als geeignete mathematische Operation habe ich die 
Routine für die Funktion INT gewählt, die im C64 ab der 
Adresse 48332 beginnt. 
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Zuerst definieren wir einen Wert für die Variable Y, der in 
die INT-Routine gebracht werden soll. 

10 Y=14.35 

Dann bestimmen wir die Sprungadresse für den USR- 
Befehl. Dazu teilen wir die Adresse 48332 auf in ein Low- 
Byte = 204 und ein High-Byte = 188. Diese POKEn wir 
nach 785/786 

20 POKE 785,204 
30 POKE 786,188 

Jetzt folgt nur noch der USR-Befehl selbst und das Aus¬ 
drucken desResultats. 

40 X=USR(Y) 

50 PRINT X 

Nach RUN erhalten wir das Resultat 14, wie das Gesetz 
für INT es befiehlt.. 

Sie können zur Übung statt INT auch COS verwenden, 
indem Sie auf die Adresse 57938 springen. Der Vergleich 
mit dem Befehl COS Y muß dasselbe Ergebnis bringen. 

Wer hat übrigens gemerkt, daß wir überhaupt nichts mit 
der Speicherzelle 784 gemacht haben, obwohl sie doch 
angeblich am USR-Befehl beteiligt ist? Sie ist es wirklich, 
doch ohne unser Zutun. In diese Adresse wird beim Ein¬ 
schalten des Computers die Zahl 76 ($4C) geschrieben. 
Das ist der Code für den Maschinenbefehl »JMP« (JUMP), 
der dieselbe Wirkung hat wie GOSUB. 

Bei Ausführung von USR springt nämlich die entspre¬ 
chende Routine zuerst auf die Speicherzelle 784, findet 
dort den Sprungbefehl und in den beiden nachfolgenden 
Speicherzellen 785 und 786 die Sprungadresse - und führt 
so den geplanten Sprung aus. 

Ich finde, USR ist es wert, in Ihre Überlegungen mit ein¬ 
bezogen zu werden, besonders wenn Sie innerhalb Ihrer 
BASIC-Programme extrem schnelle Unterprogramme in 
Maschinensprache eingebaut haben. Diese sind mit USR 
ganz elegant aufrufbar. Ich denke da zum Beispiel an eine 
Abfrage der Joysticks. 


Basic-Befehl Nr. 47 USR(X) 

- dieser Befehl ruft von einem Basic-Programm aus ein 
Maschinensprache-Unterprogramm auf 

- Dabei kann ein numerischer Ausdruck als Argument 
direkt mitgegeben werden 


35.4. Die Status-Variable ST 

Neben den Befehlen (wie PRINT) und den Funktionen 
(wie COS) hat Basic auch noch drei fest definierte Variable, 
nämlich 

TI, Tl$ und ST 

TI und Tl$ haben wir schon in Lektion 23 »Die Uhr des 
Computers« behandelt. 

Von den dreien ist ST wohl am seltensten anzutreffen, 
Grund genug, hier ein wenig darüber zu berichten. 

Die Variable ST gibt den Status nach der letzten Ein¬ 
beziehungsweise Ausgabeoperation an, beschränkt aller¬ 
dings nur auf Operationen mit der Datasette und dem an 
einem gemeinsamen Ausgang angeschlossenen Disket¬ 
tenlaufwerk und Drucker. 

ST enthält dabei den Inhalt der Speicherzelle 144. Jedes 
Bit dieses Registers hat eine eigene Bedeutung. 


Kassette: 

Bit 2 (Wert 4): 
Bit 3 (Wert 8): 
Bit 4 (Wert 16): 
Bit 5 (Wert 32): 
Bit 6 (Wert 64): 


kurzer Block 
langer Block 

Lesefehler (nicht korrigierbar) 

Pruefsummenfehler 

File-Ende 


Bit 7 (Wert 128): Band-Ende 
Diskette/Drucker: 

Bit 0 (Wert 1): Fehler beim Schreiben 


Bit 1 (Wert 2): Fehler beim Lesen 

Bit 6 (Wert 64): Daten-Ende 

Bit 7 (Wert 128): "Device Not Present "-Fehler 

Alle nicht aufgeführten Bits sind nicht benützt. 

Wichtig ist noch zu erwähnen, daß nicht nur die in der 
Tabelle gezeigten Zahlen für ST auftreten, sondern auch 
Kombinationen davon. So ergibt zum Beispiel ein zu kurzer 
Block (4) und ein gleichzeitig aufgetretener Prüfsummen¬ 
fehler (32) einen Wert von 36. 

Kassettenoperationen 

Zuerst testen wir mit einem Datei-Programm auf »FILE¬ 
ENDE«. Geben Sie bitte folgendes Programm ein: 

10 OPEN 1,1,1,"DATEI" 

20 PRINT#1, "QWERTY" 

30 CL0SE 1 
40 END 

Zur Erinnerung: Nach dem OPEN-Befehl folgt zuerst die 
Nummer der Datei (ich nehme hier 1), dann die Gerätenum¬ 
mer (1 = Datasette) und schließlich die Sekundäradresse 
(1 = Schreiben). 

Jetzt kommt der Lesevorgang: 

50 OPEN 2,1,0,"DATEI" 

60 F0R K=1 T0 10 
70 GET # 2,A$ 

80 PRINT A$;ST 
90 NEXT K 
100 CLOSE 2 

In Zeile 50 eröffnen wir wieder eine Datei (diesmal Num¬ 
mer 2) für die Datasette, jetzt aber zum Lesen (Sekundära¬ 
dresse = 0). Die Schleife der Zeilen 60 und 90 schreiben 
uns lOmal ein Zeichen (A$) und den Wert von ST auf den 
Bildschirm. 

Jetzt geht es los. Mit RUN starten wir den ersten Teil des 
Programms. Nach dem Schreibvorgang und der READY- 
Melduriy (nach Zeile 40) müssen Sie das Band zurück¬ 
spulen und mit GOTO 50 ab Zeile 50 weiterfahren. Jetzt 
wird die Datei gelesen. 

Wir erhalten untereinander die sechs Buchstaben von 
Zeile 20, daneben für ST lauter 0 bis zum Ende, dann aller¬ 
dings erscheint eine 64. Das ist der in der Tabelle angege¬ 
bene Wert von ST für »File-Ende«. 

Da die FOR-NEXT-Schleife zu lang ist, schießen wir mit 
dem Lesen über das File-Ende hinaus. Normalerweise ken¬ 
nen wir natürlich die Länge einer Datei nicht. Deshalb ist es 
besser, mit GOTO zurückzuspringen und das File-Ende 
abzufragen. 

Löschen Sie bitte Zeile 60 und 90 und fügen Sie als Rück¬ 
sprung und Prüfung ein: 

85 IF ST=64 THEN 100 
90 GOTO 70 

Statt nach ST können wir natürlich genausogut nach 
PEEK(144) fragen. 

Ein erneutes GOTO 50 bringt das erwünschte Resultat. 

Um den vorhin schon erwähnten »kurzen Block« zu 
sehen, müssen wir einen entsprechenden Fehler künstlich 
erzeugen. 

Löschen Sie bitte den ersten Teil des Programms bis ein¬ 
schließlich Zeile 40. Wir behalten also nur den Leseteil ab 
Zeile 50. Dann laden wir dieses Programm (Band vorher am 
besten wieder zurückspulen) mit SAVE »DATEI« nicht als 
Datei, sondern als ganz gewöhnliches Programm. Wenn es 
geladen ist, bitte das Band wieder zurückspulen. 

Mit RUN starten wir jetzt das Lese-Programm, welches 
eine Datei sucht, aber nur ein Programm findet, allerdings 
mit dem richtigen Namen. Natürlich findet es einen Fehler 
und wir erhalten als Ausdruck: 

36 oder manchmal auch 4 
64 64 

Die Zahl 36 entsteht aus 32+4, das bedeutet Prüfsum- 
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menfehler + Block zu kurz. Danach folgt wie vorher das 
File-Ende. 

Die normale Blocklänge entspricht der Länge des Band¬ 
puffers, in den die Datasette einspeichert. Er ist 191 Byte 
lang. In unserem Fall war offenbar der Block nicht ganz voll. 

Der Prüfsummenfehler tritt dann auf, wenn eine der 


NOT PRESENT«, den wir dadurch erzeugen, daß wir ein 
Programm oder die Directory von der Diskette laden wollen, 
ohne daß dieses Gerät angeschlossen oder eingeschaltet 
ist. Nach der Fehlermeldung geben wir direkt ein: 

PRINT ST oder PRINT PEEK(144) 
und wir erhalten die Zahl 128. 


Überprüfungen von Kassettenoperationen einen Fehler 
gefunden hat. Der Blockfehler, auch der des zu langen 
Blocks, interessiert wohl weniger. Aber ein durch die Prü¬ 
fungen gefundener Fehler könnte, frühzeitig noch vor dem 
Ausstieg des Programms entdeckt, abgefangen und aus¬ 
gemerzt werden. 

Die Formel dafür, ins obige Programm eingebaut ist: 

85 IF ST<64 OR ST>8 THEN ..(z.B. LIST) 

Statt LIST kann man natürlich auch etwas anderes neh¬ 
men. 

Diskettenoperationen 

Bei dem Diskettenlaufwerk bedeutet ST=64 »DATEN¬ 
ENDE«, das ist etwa dasselbe wie bei der Datasette. Um es 
zu überprüfen, nehmen wir dasselbe Programm wie vorher, 
nur müssen wir die DATEI-Zeilen der Diskette anpassen. 
Das sieht dann so aus: 

10 OPEN 1,8,1,"DATEI,S,W" 

20 PRINT#1, "QWERTY" 

30 CLOSE 1 
40 END 

50 OPEN 2,8,0,"DATEI,S,R" 

60 F0R K=1 TO 10 
70 GET # 2, A$ 

80 PRINT A$;ST 
90 NEXT K 
100 CLOSE 2 

Das Ergebnis sieht hier so aus: 

s*ER on 

66 

66 

Die 64 ist natürlich wie erwartet der Wert für Daten-Ende. 
Die 66 ist 64+2, entstanden dadurch, daß wir über das 
Daten-Ende hinausgelesen haben. Die 2 bedeutet »Fehler 
beim Lesen« (in den englischen Beschreibungen heißt es 
»Read Time Out«). Ähnliches gilt für ST=1, das bedeutet 
»Fehler beim Schreiben« (englisch: Write Time Out). 

Wie bei der Datasette kann das Überlesen natürlich mit 
der Abfrage 

IF ST=64 THEN _ und GOTO... 

gestoppt werden. 

Interessant ist noch der Status beim Fehler »DEVICE 


Wie man allerdings in einem BASIC-Programm durch 
Abfrage von ST=128 die Fehlermeldung »Device Not Pre¬ 
sent« und den dann folgenden Programmabbruch vermei¬ 
den kann, bedarf einer gesonderten Maßnahme: 

Es gibt zwei Speicherzellen - 768/769 -, in denen in Low-/ 
High-Byte-Darstellung eine Adresse steht, auf die das 
Betriebssystem springt, wenn die Meldung »DEVICE NOT 
PRESENT« ausgegeben werden soll. Diesen Zeiger kann 
man so »verbiegen«, daß die Meldung nicht ausgegeben 
wird und daß das Programm einfach weiterläuft. 

Normalerweise steht in 768 die Zahl 139, in 769 die Zahl 
227. Verbogen wird der Zeiger durch eine 61 (185 geht 
auch). Dadurch zeigt die Adresse auf eine Speicherzelle 
des Betriebssystems, in welcher der Assembler-Befehl 
"RTS", das bedeutet Rücksprung, steht. Jetzt können wir 
ungestört den ST-atus abfragen, wir müssen allerdings 
den negativen Wert von ST, also -128 nehmen. 

10 P0KE 768,61 Fehlermeldung abschalten 

20 OPEN 1,8,15 Gerät ansprechen 

40 CLOSE 1 

50 P0KE 768,139 Fehlermeldung einschalten 

60 IF ST=-128 THEN 100 Sprung Bel ausgeschalteten 

Gerät 


70 PRINT" FORTSETZUNG" weiter im Programm 
80 END Ende der DEMO 

100 PRINT" GERAET EINSCHALTEN" 

110 GET A$:IF A$=""THEN 110 Warteschleife 
. lmci-vro io neuer Versuch 

Drucivär-Operation 

Für den Drucker sieht das Listing fast genauso aus. Die 
einzige Änderung ist in den Zeilen 20 und 30: 

20 OPEN 1,4 
30 PRINT #1 

Unter bestimmten Umständen kann das Verbiegen des 
Zeigers in 768 entfallen, wie einige der Zuschriften ergeben 
haben. 

Ich möchte nach eigenen längeren Versuchen aber dafür 
plädieren, die Fehlermeldung immer abzuschalten, um nie 
in Schwierigkeiten zu kommen. 

Vorsicht ist die Mutter der Weisheit. 

(Dr. H. Hauck/og) 
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Die 1000 Nöte 
der Datenspeicherung 


Die magnetische Datenspeicherung, sei es auf 
Kassette oder Diskette, ist eine heikle Sache, bei 
der hin und wieder Fehler auftreten können. In 
diesem Bericht klären wir die möglichen Fehler 
und ihre Ursachen bei Floppy und Datasette. 

D ie Datasette und die Floppy 1541 sind für Besitzer 
eines C64 die bekanntesten Medien, um Programme 
und andere Daten für längere Zeit zu speichern. Sie 
sind fast schon eine Selbstverständlichkeit geworden. 
Doch während wir mit diesen Geräten arbeiten, ist uns 
meist nicht bewußt, welche komplizierten Vorgänge hinter 
dem Begriff »magnetische Datenspeicherung« stecken. 
Solange alles ordnungsgemäß abläuft, ahnen wir nichts 
oder nur wenig von der komplexen Organisation, die uns 
das Speichern von Programmen auf Kassette oder Diskette 
ermöglicht. Treten jedoch erste Probleme auf, stellt man 
fest, daß das eigene Wissen über den C64, die Floppy 1541 
oder die Datasette nicht ausreicht. 

Das erste Problem, mit dem der Anwender konfrontiert 
wird, ist die große Anzahl der Fehler, die beim Arbeiten mit 
dem Computer auftreten können. Doch auch die Floppy 
1541 besitzt viele Fehlermeldungen, die verstanden wer¬ 
den sollten. Selbst die Datasette birgt einige Geheimnisse, 
die für das Laden und Speichern von Daten von Bedeutung 
sind. 

Die Fehlermeldungen der Datasette und der Floppysta- 
tion sind das Thema dieses Berichts, wobei wir zunächst 
mit dem einfachen Speichermedium Datasette beginnen 
wollen. 

Soeben haben Sie sich eine Programmkassette gekauft, 
die ein neues Spiel enthält. Voller Erwartung schalten Sie 
Ihren C64 ein und laden das Programm. Nach merkwürdig 
kurzer Zeit stoppt die Datasette unvermittelt, während 
anders als sonst die ungewöhnliche Meldung »?LOAD 
ERROR« auf dem Monitor zu lesen ist. Trotz intensiver 


Bemühungen, wie mehrmaligem Tippen von RUN, läßt 
sich dä? Programm nicht starten. Schließlich versuchen 
Sie, das t-rogramm erneut zu laden, doch erhalten Sie stets 
die gleiche unangenehme Nachricht auf dem Bildschirm. 
Das Spiel scheint verloren. 

Die eben beschriebene Erfahrung werden viele 
Computeranwender machen, die oft mit der Datasette 
arbeiten. Der »?LOAD ERROR« ist dabei eine der vielen 
Fehlermeldungen, die der Computer zur Verfügung stellt, 
um Ihnen mitzuteilen, daß bestimmte Vorgänge nicht ord¬ 
nungsgemäß abgelaufen sind. Er tritt beim Betrieb der 
Datasette auf und zeigt an, daß das zu ladende Programm 
nicht einwandfrei von der Kassette gelesen werden kann. 
Die Ursachen können dabei vielfältiger Art sein, werden 
jedoch immer mit der schon bekannten Meldung ange¬ 
zeigt. 

Unsicheres Speichermedium - Datasette 


Für die genauere Lokalisierung eines Fehlers kann eine 
bereits vom Computer reservierte Variable Auskunft 
geben. Sie hat den Namen »ST« und wird als Statusvariable 
bezeichnet, da sie den Status, das heißt, den augenblickli¬ 
chen Zustand einer Datenübertragung, anzeigt. Jedes der 
8 Bit dieses Wertes hat dabei eine bestimmte Aufgabe, wel¬ 
che Sie in Tabelle 1, zusammengefaßt, vorfinden. Die Bits 
2 bis 5 befassen sich speziell mit der Datasette. 

Um Fehler bei der Speicherung so gut als möglich zu ver¬ 
meiden, trifft der Computer einige Vorkehrungen. Wird ein 
Programm auf Kassette geschrieben, legt der C64 direkt 
hinter dem gespeicherten Programm eine komplette Kopie 
der Daten an, so daß das Programm eigentlich doppelt 
gespeichert wird. Liest der Computer die Daten anschlie¬ 
ßend wieder ein, lädt er die erste Version in den Speicher. 
Danach vergleicht er sie mit der Kopie. Stimmen einige 
Byte nicht überein, wird zunächst ein Versuch zur Korrektur 
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unternommen. Gelingt dies nicht, setzt der Computer das 
Bit 4 der Statusvariable (PRINT ST ergibt den Wert 16) und 
stoppt den Ladevorgang mit einem »?LOAD ERROR«. 

Eine weitere Sicherheit bietet eine Prüfsumme. Während 
des Speicherns bildet der C64 eine Prüfsumme über die 
Programmdaten und legt sie zusätzlich auf dem Magnet¬ 
band ab. Laden Sie nun ein Programm, wird aus den gele¬ 
senen Bytes ebenfalls eine Prüfsumme errechnet, die mit 
der gespeicherten übereinstimmen muß. Ansonsten ist 
wiederum ein »?LOAD ERROR« die Folge. Ein Test der Sta¬ 
tusvariable gibt genauere Auskunft. Sie hat in diesem Fall 
den Wert 32 (Bit 5 gesetzt): ein Prüfsummenfehler. 

Zusätzlich kann es Vorkommen, daß während des Lade¬ 
vorgangs besondere Bytemarkierungen nicht ordnungsge¬ 
mäß erkannt werden. Diese benötigt der Computer zur 
genauen Synchronisierung beim Lesen von Daten, denn er 
muß stets den Überblick überden Anfang und das Ende der 
einzelnen Bytes behalten. Fehlerhafte Markierungen stif¬ 
ten Verwirrung, weil die Daten nicht mehr richtig identifi¬ 
ziert werden können. In diesem Fall hat die Statusvariable 
ST bei einem »?LOAD ERROR« die Werte 4 oder 8 (Bit 2 
oder 3 gesetzt). 

Die richtige Einstellung ist alles 


Meist hat das Auftreten eines Ladefehlers eine recht einfa¬ 
che Ursache. Im Laufe der Zeit bildet sich eine Schmutz¬ 
schicht auf dem Tonkopf der Datasette, die das Lesen und 
Schreiben von Daten behindern kann. Mit einem alkohol¬ 
getränkten Wattestäbchen oder einer Reinigungskassette 
ist eine Reinigung schnell und einfach vorzunehmen. Hat 
man damit keinen Erfolg, kann das Problem an einem wei¬ 
teren Phänomen liegen. 

Möglicherweise war die Stellung des Tonkopfes Ihrer 
Datasette bezüglich des Kassettenbandes beim Schreiben 
des Programmes mit SAVE nicht die gleiche, wie beim 
Lesen mit LOAD. Man kann dies besonders bei Kassetten 
beobachten, die nicht mit der eigenen Datasette beschrie¬ 
ben wurden, da die Tonköpfe der Datasetten von Commo- 
dore in der Regel die unterschiedlichsten Einstellungen 
vorweisen können. 

Oft hilft hier ein wiederholter Ladeversuch mit einer 
etwas anderen Tonkopfjustierung. Das Verstellen läßt sich 
übrigens leicht an einer der kleinen Schrauben neben dem 
Tonkopf vornehmen. Eine perfekte Justage ist mit einer 
kleinen elektronischen Schaltung zu bewerkstelligen, die 
wir im Sonderheft 15 des 64’er-Magazins vorgestellt haben. 

Erscheint nach mehreren Einstellungen jedoch weiter¬ 
hin die gefürchtete Fehlermeldung, handelt es sich aller 
Wahrscheinlichkeit nach um eine Kassette mit schadhaf¬ 
tem Bandmaterial. Beim Kauf von Leerkassetten sollten Sie 
deshalb auf gute Qualität achten (hochwertiges »Low- 
noise«-Eisenoxidband genügt). Fehlerhafte Softwarekas¬ 
setten mit fertig gespeicherten Programmen sollten beim 
entsprechenden Händler reklamiert werden. 

Doch auch Ihr bestes selbstgeschriebenes Programm ist 
möglicherweise noch nicht verloren, wenn ein Fehler auf¬ 
getreten ist. Zeigt die Statusvariable die Werte 16 (Fehler 
bei Vergleich) oder 32 (Prüfsummenfehler) können mit 
etwas Aufwand und Glück die Daten dennoch gelesen wer¬ 
den, da das Programm aufgrund der Sicherheitskopie 
zweimal hintereinander auf der Kassette steht. Die Markie¬ 
rungsfehler (PRINT ST ergibt 4 oder 8) sind dagegen recht 
schwer oder gar nicht zu umgehen. Eine Rettung des Pro¬ 
grammes ist hier sehr unwahrscheinlich. Fand der Lesefeh¬ 
ler kurz vor Programmende statt, kann bei einem Basic- 
Programm zumindest der bereits geladene Teil in Sicher¬ 
heit gebracht werden. Am Ende eines solch verstümmelten 


Programmes befindet sich ein meist undefinierbares 
Durcheinander an Werten, was sich bei LIST durch wirre 
Zeichen in einer Basic-Zeile bemerkbar macht. Ein soge¬ 
nannter OLD-Befehl (oder auch RENEW: Rückgängig¬ 
machen von NEW) kann das »Wirrwarr« wieder in Ordnung 
bringen. Da der C64 diese Anweisung jedoch bei seinem 
Basic 2.0 nicht kennt, müssen Sie in diesem Fall auf eine 
Basic-Erweiterung zurückgreifen. 

Vorbeugen mit VERIFY 


Damit die bisher geschilderten Probleme nicht auftreten, 
ist es ratsam, ein gerade gespeichertes Programm 
sogleich mittels VERIFY auf seine Fehlerfreiheit zu unter¬ 
suchen. VERIFY vergleicht das im Speicher befindliche 
Programm mit dem gespeicherten und zeigt eventuelle 
Unterschiede durch eine Fehlermeldung an. Wurde das 
Programm korrekt auf Band geschrieben, lautet die Mel¬ 
dung nach dem Vergleich »OK«. Ein »7VERIFY ERROR« 
bedeutet hingegen, daß Fehler bei der Speicherung oder 
beim vergleichenden Lesen auftraten. Das Programm 
sollte nochmals mit SAVE gespeichert werden. Liegt die 
Vermutung nahe, daß das Kassettenband schadhaft ist, 
verwenden Sie am besten eine neue Kassette. 

Diese Sicherheitsvorkehrungen sind zwar mit einem gro¬ 
ßen Zeitaufwand verbunden, vermeiden aber meist Pro¬ 
bleme mit den eben beschriebenen Lesefehlern und den 
Ärger über ein verlorenes Programm. Das Rekonstruieren 
eines zerstörten Programmes ist zudem sehr viel umständ¬ 
licher. 

Wer jedoch ganz sicher gehen will, sollte zur Speiche¬ 
rung seiner Programme keine Datasette verwenden. Abge¬ 
sehen von der nicht gerade überwältigenden Arbeitsge¬ 
schwindigkeit dieses Gerätes (die sich zwar mit Fast-Tape- 
Programmen erheblich beschleunigen läßt) ist das Schrei¬ 
ben von Daten auf Kassetten keine besonders sichere 
Angelegenheit. 

Komfort und Sicherheit 
mit der Floppy 1541 


Wesentlich sicherer und schneller ist dagegen eine Floppy- 
station, die die Datenspeicherung auf Disketten erlaubt. 
Abgesehen vom Geschwindigkeitsvorteil bietet sie einen 
besseren Bedienungskomfort und eine relativ hohe Auf¬ 
zeichnungsdichte. 

Die Floppy 1541 zeigt einen sehr viel komplizierteren Auf¬ 
bau als die vergleichsweise primitive Datasette. Neben 
dem Laufwerk und der Mechanik zur Bewegung des 
Schreib-/Lesekopfes sind viele elektronische Bauteile im 
Gehäuse des Laufwerks untergebracht. Sie übernehmen 
die Steuerung der mechanischen Teile und koordinieren 
den Ablauf des Schreibens und Lesens auf der Diskette. 
Betrachtet man diese Schaltungen genauer, stellt man fest, 
daß sie ähnlich kompliziert sind wie die eines Computers, 
wobei wir auf einen wesentlichen Aspekt der Floppy 1541 
zu sprechen kommen. 

Anders als bei anderen Floppylaufwärken, die lediglich 
Daten lesen und schreiben können, kann die Floppy 1541 
als »intelligente« Diskettenstation bezeichnet werden, da 
sie selbstständig Operationen durchführen kann, ohne 
vom Computer gesteuert werden zu müssen. Wie ein voll¬ 
ständiger Computer besitzt die Floppy 1541 einen eigenen 
Mikroprozessor (CPU), ein Betriebssystem, das DOS 
genannt wird und etwas RAM als Arbeitsspeicher für 
diverse Aktionen. Lediglich Bildschirm und Tastatur fehlen. 
Sie werden aber nicht benötigt, da die Kommunikation aus- 
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schließlich über Ihren C64 erfolgt. Das DOS (»Disk Opera¬ 
tion System« = Diskettenbetriebssystem) erlaubt dies 
sogar auf recht einfache Weise, wie wir noch sehen wer¬ 
den. 

Wie Sie vielleicht wissen, besitzt der C64 eine Vielzahl 
(genau 30) verschiedener Fehlermeldungen, die Sie darauf 
aufmerksam machen, daß zum Beispiel ein Fehler wäh¬ 
rend des Programmablaufs aufgetreten ist. Die »intelli¬ 
gente« Floppy 1541 kennt ebenfalls 34 Fehlermeldungen, 
die dem Benutzer Ungereimtheiten bei der Arbeit mit einer 
Diskette mitteilen. Die Floppystation besitzt jedoch keinen 
Bildschirm, auf dem sie diese anzeigen kann, und so muß 
sie einen anderen Weg gehen. Ist ein Fehler, etwa beim 
Lesen eines Programms, aufgetreten, beginnt die sonst 
konstant leuchtende rote Leuchtdiode am Laufwerk unre¬ 
gelmäßig zu flackern, während ungewöhnliche »Klick«- 
Geräusche aus dem Inneren des Gehäuses zu vernehmen 
sind. Oftmals beschwert sich die Floppy 1541 mit einem 
unangenehmen Rattern, bis der Diskettenmotor schließlich 
anhält und die rote Leuchtdiode nun in einem regelmäßi¬ 
gem Rhythmus blinkt. Nach all diesen akustischen und 
optischen Zeichen weiß der Computeranwender, daß bei 
der Arbeit mit dem Diskettenlaufwerk ein Fehler erkannt 
worden ist, doch kann man noch nicht feststellen, um wel¬ 
che Art von Fehler es sich handelt. 

Kommunikation mit der Floppy 1541 


Zunächst müssen wir mit der Floppystation in Verbindung 
treten. Dies geschieht über den sogenannten Kommando¬ 
kanal der 1541. Er dient in erster Linie zum Übermitteln von 
Befehlen an die Floppystation, denn als intelligentes Gerät 
versteht sie natürlich auch Kommandos, die sie prompt und 
selbständig ausführt. Wir wollen uns aber mit der zweiten 
Aufgabe des Kommadokanals beschäftigen. Zusätzlich 
wird er nämlich als »Fehlerkanal« verwendet, der die 
Status- oder Fehlermeldungen der Floppy 1541 an den 
Computer übermitteln kann. Ist uns bei der Bedienung der 
Diskettenstation ein Fehler unterlaufen, was wir an der blin¬ 
kenden roten LED erkannt haben, können wir über diesen 
Kanal das Laufwerk nach der Ursache des Mißgeschicks 
befragen, das heißt, die exakte Fehlermeldung erhalten. 
Doch wie können wir den Fehlerkanal ansprechen? 

Die Floppy 1541 besitzt insgesamt 16 Kanäle, die alle 
gewissen Aufgaben dienen. Sie können entweder zum 
Schreiben oder Lesen von Daten verwendet werden. Sie 
sind von 0 bis 15 durchnumeriert, wobei die Kanäle 2 bis 14 
dem Anwender zur Verfügung stehen. Die Kanäle 0,1 und 
15 sind jedoch von der Floppystation reserviert, wobei 
Kanal 15 unser besagter Kommandokanal ist. Er läßt nur 
das Senden von DOS-Kommandos oder das Empfangen 
der Fehlermeldungen zu. Wollen wir diesen Kanal anspre¬ 
chen, müssen wir uns jedoch mit dem nötigen Handwerks¬ 
zeug vertraut machen. Bevor wir die Fehlermeldung lesen 
können, müssen wir den Kommandokanal aktivieren, was 
oft auch als Öffnen bezeichnet wird. Dazu verwenden wir 
den Basic-Befehl OPEN, den Sie vielleicht schon vom 
Arbeiten mit Dateien kennen. Für das Öffnen des Komman¬ 
dokanals ist folgendes einzugeben: 

OPEN 1,8,15 

Damit richten wir eine Datei mit der Nummer 1 ein und 
adressieren die Floppystation mit der Gerätenummer 8. Die 
letzte Zahl der obigen Anweisung gibt schließlich die Kanal¬ 
nummer an, die der Datei zugeordnet werden soll. Sie lau¬ 
tet 15, und das ist - wie wir schon wissen - der Kommando¬ 
kanal. 

Nun können wir zum Beispiel einen Befehl an die Floppy 
1541 senden, der nach einer Prüfung auf korrekte Syntax 


ausgeführt wird. Das soll uns aber hier nicht weiter interes¬ 
sieren. Wir wollen nur Daten empfangen, nämlich die Feh¬ 
lermeldungen, die uns das Laufwerk bereitstellt. Das 
ermöglichen uns die Anweisungen INPUT# oder GET#. 
Sie funktionieren ähnlich wie die Anweisungen INPUT und 
GET. Mit INPUT# können mehrere Zeichen einer Datei 
gelesen werden, während GET# nur ein Zeichen emp¬ 
fängt. Wie INPUT und GET dürfen beide Befehle nur in 
einem Programm und nicht im Direktmodus verwendet 
werden, weshalb wir jeweils eine Zeilennummer voranstel¬ 
len: 

10 OPEN 1,8,15 

20 INPUT#1,FN,FM$,TR,SE: PRINT FN;FM$;TR;SE 

Nach Beendigung der Arbeit muß der Kommandokanal 
wieder geschlossen, das heißt inaktiviert werden, was 
durch den Befehl CLÖSE erfolgt. Schließen wir also unsere 
Datei mit der Nummer 1 wieder: 

30 CL0SE 1 

Wenn Sie die Zeile 20 unseres kleinen Programms 
betrachten, werden Sie erkennen, daß die Fehlermeldung 
der 1541 aus vier unterschiedlichen Teilen besteht. Der 
erste Wert, der überden Kommandokanal empfangen wird, 
ist die Nummer des aufgetretenen Fehlers (FN). Der darauf¬ 
folgende String enthält die Meldung im Klartext (FM$), wäh¬ 
rend die abschließenden Werte TR und SE eine nähere 
Lokalisierung des Fehlers erlauben. Ihre genaue Bedeu¬ 
tung wird im Laufe dieses Berichtes noch erläutert. 

Ebenso kann die Meldung Zeichen für Zeichen mit 
GET # gelesen werden. Zeile 20 würde dann so aussehen: 
20 GET#1,A$: PRINT A$;: IF ST <>64 THEN 20 

Seltsamerweise tritt hier die uns schon bekannte Status¬ 
variable ST auf. Sie hilft uns, das Ende der Meldung festzu¬ 
stellen. Liegen keine weiteren Daten von einem Gerät am 
seriellen Bus mehr an, nimmt ST den Wert 64 (Bit 6 ist 
gesetzi'/c.n. Die vollständige Fehlermeldung wurde gesen¬ 
det. 

Nachdem Sie unser kleines Fehlerprogramm mit RUN 
gestartet haben, sollten folgende Zeichen ausgegeben 
werden: 

0 OK 0 0 
oder 

00, OK,00,00 

Erstere Meldung erhalten Sie bei der Programmversion 
mit INPUT #, während zweitere bei der Zeile 20 mit GET # 
ausgegeben wird; die Aussage ist jedoch die gleiche. Diese 
beiden Texte sind eigentlich keine Fehleranzeigen. Sie tei¬ 
len üns lediglich mit, daß ein Befehl oder eine Aktion der 
Floppystation einwandfrei ausgeführt worden ist. Selbst 
wenn wir kein Kommando gesendet haben, wird nach 
Ablauf unseres Programms immer diese Statusnachricht 
auf dem Bildschirm erscheinen. Man kann sie als das 
»READY« der Floppy 1541 verstehen. Die rote Leuchtdiode 
blinkt dabei nicht. Lediglich nach dem Einschalten der Dis¬ 
kettenstation können wir eine andere Statusmeldung emp¬ 
fangen. Sie lautet 
73, CBM DOS V2.6 1541,00,00 

Damit »begrüßt« uns die Floppy 1541 und sagt uns, mit 
welcher Version des DOS gearbeitet wird. Tritt sie in Verbin¬ 
dung mit einer blinkenden roten Leuchtdiode auf, hat sie 
eine andere Bedeutung, die wir noch kennenlernen wer¬ 
den. Doch können wir noch eine weitere Statusmeldung 
empfangen, deren Ankunft nicht durch ein Flackern der 
Arbeits-LED angekündigt wird. 

Das »Wegkratzen« von Dateien 


Bei der Arbeit mit Disketten kommt es oftmals vor, daß man 
ein gespeichertes Programm nicht mehr benötigt. Nun 
könnte man das Programm durchaus auf der Diskette 
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belassen, jedoch würde dadurch unnötiger Speicherplatz 
belegt, der für andere Programme oder Daten verloren 
ginge. Das Programm muß also von der Diskette gelöscht 
werden. Als eifriger Anwender der Floppy 1541 haben Sie 
deshalb sicherlich das Handbuch nach einem geeigneten 
Befehl durchsucht und sind auf eine entsprechende Anwei¬ 
sungsfolge gestoßen: 

OPEN 1,8,15 
PRINT# 1, "S: (Name) " 

CLOSE 1 

Haben Sie bisher diese etwas komplizierte Folge einfach 
als Befehl hingenommen, ohne über die seltsamen Anwei¬ 
sungen nachzudenken, werden Sie spätestens bei der 
Erklärung des Kommandokanals in diesem Bericht eine 
Ähnlichkeit zu unserem Fehlerprogramm festgestellt 
haben. In beiden Fällen muß der Kommandokanal geöffnet 
werden. Beim Löschen eines Programmes von Diskette 
wird lediglich mit PRINT # eine Zeichenfolge an die Floppy 
1541 geschickt und zwar ein DOS-Befehl mit dem Namen 
»S«. Er ist die Abkürzung für »SCRATCH«, was auf Deutsch 
etwa »wegkratzen« bedeutet. Nachdem man den Scratch- 
Befehl eingegeben hat, beginnt das Laufwerk zu arbeiten 
(rote Leuchtdiode leuchtet). Nach kurzer Zeit erlischt die 
rote LED wieder; die Floppy 1541 hat die Datei mit dem 
angegebenen Namen gelöscht. Als Bestätigung kann man 
eine Statusmeldung empfangen, die uns mitteilt, daß eine 
Datei gelöscht wurde: 

01, FILES GCRATCIIED,01,00 

Die erste Zahl hinter der Klartextmeldung gibt an, wie 
viele Dateien gelöscht wurden. Dies ist durchaus sinnvoll, 
da man mit Hilfe der Jokerzeichen (? und *) mehrere 
Dateien zugleich von der Diskette entfernen lassen kann. 
Die Anweisung 

OPEN 1,8,15 . n| 

PRINT# 1, "S:TE#" 

CLOSE 1 

richtet sich beispielsweise an sämtliche Dateien einer Dis¬ 
kette, die mit den Buchstaben »TE« beginnen. Befinden 
sich vielleicht die Programme »TEST« und »TEXT« auf der 
eingelegten Diskette, werden beide gelöscht, und bei der 
Statusmeldung »FILES SCRATCHED« die Zahl 02 (2 
Dateien) ausgegeben. 

Die »echten« Fehlermeldungen 


Kommen wir aber nun zu den Meldungen, die einen richti¬ 
gen Fehler anzeigen. Jede besitzt eine Nummer zwischen 
0 und 74. Doch nicht jeder Nummer ist einer Fehlermeldung 
zugeordnet (es gibt »nur« 34). Wir werden diese im folgen¬ 
den auch nicht nach Nummern sortiert vorstellen, sondern 
wir gruppieren sie nach ihrer Funktion und Bedeutung. 

Beginnen wir gleich mit einigen einfachen Fehlern, die 
Sie bei der Arbeit mit der Floppy 1541 relativ häufig erhalten 
werden. Sie sind jedoch vergleichsweise harmlos. 

Es kann Vorkommen, daß Sie versehentlich mit dem Dis¬ 
kettenlaufwerk arbeiten wollen, obwohl sich keine Diskette 
darin befindet. Die Floppy 1541 bemerkt dies recht schnell 
und antwortet sofort: 

74,DRIVE NOT READY,00,00 

Sollten Sie aber dennoch eine Diskette in den Laufwerk¬ 
schacht geschoben haben, kann die Ursache an einer 
unformatierten Diskette oder an Problemen bei der 
Schreib-/Lesekopfbewegung liegen. Im ersten Fall muß die 
Diskette formatiert werden (siehe Handbuch). Im zweiten 
Fall hilft manchmal die nachstehende Befehlsfolge: 

OPEN 1,8,15 
PRINT #1, "I" 

CLOSE 1 


Befindet sich unter Ihrer Diskettensammlung auch eine 
Diskette, die auf einer anderen Commodore-Floppystation 
(zum Beispiel CBM 3040) beschrieben wurde, kann die 
Floppy 1541 sie unter Umständen nur lesen. Beim Schrei¬ 
ben gibt es Schwierigkeiten; die Diskette wird sofort als 
fremd erkannt. Eine uns schon bekannte Meldung wird 
über den Kommandokanal gesendet: 

73,CBM DOS V2.6 1541,00,00 

Nun blinkt die rote LED und zeigt uns einen Fehler an. 
Die Nachricht soll uns daran erinnern, daß wir nur Disketten 
verwenden dürfen, die von einer Floppy 1541 beschrieben 
wurden oder zu diesem Diskettensystem passen. 

Endlich liegt die richtige Diskette im Laufwerk. Voller 
Stolz wollen Sie ein selbstgescffriebenss Basic-Programm 
mit SAVE speichern. Doch schon nach kurzer Zeit blinkt 
erneut die rote Leuchtdiode. Auü dem Fehlerkanal wartet 
folgende Meldung auf ihren Abruf: 

26,WRITE PROTECT 0N,00,00 

Hier ist offensichtlich die Schreibschutzkerbe der Dis¬ 
kette (die kleine eckige Aussparung an der Seite des Dis¬ 
kettenmantels) mit einer Plakette überdeckt. Wie der Name 
schon sagt, kann man durch Überkleben dieser Kerbe eine 
Diskette vor dem Überschreiben oder Löschen schützen. 
Entfernt man die Abdeckung wieder, ist die Speicherung 
wieder möglich. 

»SYNTAX ERROR« gleich sechsmal 


Haben Sie den Aufkleber von der Kerbe entfernt, können 
Sie mehrere Programme mit SAVE auf die Diskette schrei¬ 
ben. Irgendwann ist jedoch die Kapazität der Diskette 
erschöpft. Paßt ein Programm nicht mehr darauf, wird die 
Floppy 1541 die Nachricht 
72fTOSK FULL, 00,00 

auf dem Fehlerkanal bereitstellen. Dieser Fehler tritt auch 
auf, wenn Sie zu viele verschiedene Programme speichern 
wollen. Auf einer Diskette können nämiich maximal 144 
Dateien abgelegt werden, selbst wenn ansonsten noch 
Speicherplatz zur Verfügung steht. 

Betrachten Sie Tabelle 2, dann sehen Sie alle bisher 
besprochenen Status- und Fehlermeldungen. Eine Kurz¬ 
beschreibung gibt nochmals einen Überblick über deren 
Bedeutungen und Ursachen. 

Kommen wir nun zu einem Fehlertyp, den Sie wahr¬ 
scheinlich von Ihrem C64 kennen: dem »SYNTAX 
ERROR«. Er erscheint auf Ihrem Computer beispielsweise, 
wenn Sie einen Befehl eingetippt haben, den der C64 nicht 
kennt. Eine andere Ursache kann sein, daß eine Anwei¬ 
sung falsch, das heißt, nicht den Regeln entsprechend, ein¬ 
gegeben wurde. Der Computer beschwert sich mit einem 
»SYNTAX ERROR«, da die Syntax (Schriftform) eines 
Befehles nicht ordnungsgemäß befolgt wurde. Ähnlich ver¬ 
hält es sich auch bei der Floppy 1541. In vorangegangenen 
Abschnitten haben wir erwähnt, daß die Floppystation ver¬ 
schiedene Kommandos verarbeiten kann. Wie beim C64 
muß bei der Eingabe, also dem Senden über den Komman¬ 
dokanal eine Syntax eingehalten werden. Wird diese igno¬ 
riert, antwortet das Diskettenlaufwerk mit einem »SYNTAX 
ERROR«. Doch macht die Floppy 1541 bei der Art der Feh¬ 
lerkennung genaue Unterschiede. Sie kennt insgesamt 
sechs Syntax-Fehlermeldungen mit den Fehlernummern 
30 bis 34 und 39. Einige davon haben jedoch sehr ähnliche 
Bedeutungen. 

Ein »SYNTAX ERROR« liegt vor, wenn ein Kommando, 
das über den Kommandokanal gegeben wird, nicht als 
Befehl identifiziert werden kann. Oftmals sind falsch ange¬ 
ordnete Parameter, die mit dem Befehl gesendet werden 
müssen, die Übeltäter. In diesem Fall wird die Floppystation 
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einen Syntax-Error mit der Nummer 30 ausgeben. Existiert 
der Befehl jedoch gar nicht, beschwert sich das Laufwerk 
mit einem Fehler der Nummer 31. Ist man aber fest davon 
überzeugt, einen korrekten Befehl eingegeben zu haben, 
kann der Grund bei einem Leerzeichen liegen, das man 
versehentlich vor das Kommandowort gesetzt hat. Das Dis¬ 
kettenlaufwerk akzeptiert nur Anweisungen, die an erster 
Position stehen. Die dritte Meldung, die auf einen falschen 
Befehl hinweist, ist der Syntax-Error mit der Nummer 39. Er 
tritt auf, wenn ein Befehl von der Floppy 1541 nicht eindeu¬ 
tig interpretiert werden kann, weil er zum Beispiel zusam¬ 
men mit anderen Zeichen in einer Kommandozeile steht. 

Eine sogenannte Befehlszeile, das heißt, die Befehls¬ 
folge, die über den Kommandokanal geschickt wird, darf 
bei der Floppy 1541 maximal 58 Zeichen lang sein. Bei den 
meisten DOS-Anweisungen wird man dieses Maximum 
nicht überschreiten, da die Anordnung der eventuell mitge¬ 
sendeten Parameter fest vorgeschrieben ist. Einigen Kom¬ 
mandos können jedoch variable Parameterlisten ange¬ 
hängt werden. In einem solchen Fall kann es leicht gesche¬ 
hen, daß die Befehlszeile länger als 58 Zeichen wird. Ein 
»32, SYNTAX ERROR,00,00« ist die Folge. 

Kennt man die wichtigsten Diskettenbefehle, lernt man 
schnell, welche davon einen oder mehrere Dateinamen 
benötigen. Es ist dann höchst unwahrscheinlich, daß man 
zum Beispiel beim Löschen einer Datei vergißt, den Namen 
der betreffenden Datei anzugeben. Doch das Fehlen eines 
einzigen Zeichens kann es für das DOS der 1541 unmög¬ 
lich machen, die Bezeichnung zu erkennen. Ein kleines 
Beispiel soll dies demonstrieren: 

OPEN 1,8,15 
PRINT #1, "STEST" 

CL0SE 1 

Wie Sie sehen können, fehlt hier der Doppelpunkt zwi¬ 
schen Befehl (S) und Dateiname (TEST). In diesem Fall 
kann die Floppy 1541 den Namen »TEST« nicht entziffern 
und gibt einen besonderen Fehler mit der Nummer 34 aus. 
Er weist uns darauf hin, daß ein Dateiname in der Komman¬ 
doanweisung fehlt, der für die Bearbeitung des angegebe¬ 
nen Befehls notwendig ist. 

Der sechste »SYNTAX ERROR« steht ebenfalls mit Datei¬ 
namen im Zusammenhang. Seine Nummer ist 33. Tritt die¬ 
ser Fehler auf, wissen wir, daß wir eines der Jokerzeichen 
falsch angewendet haben. Die Joker (? und *) sind 
bekanntlich Hilfsmittel, um Dateinamen abzukürzen, oder 
wie bei dem SCRATCH-Kommando, um mehrere Dateien 
einer Diskette gleichzeitig anzusprechen. Bei einigen 
Befehlen, die Namen als Parameter benötigen, dürfen die 
Jokerzeichen nicht eingesetzt werden. Eines dieser Kom¬ 
mandos ist Ihnen geläufig. Es ist das NEW- oder N- 
Kommando zum Formatieren einer Diskette. Mißbrauchen 
wir nun einmal vorsätzlich den Joker »*«: 

OPEN 1,8,15 

PRINT#1, "N:TESTDIS*,TD" 

CL0SE 1 

Die Diskettenstation wird dies nicht akzeptieren und fol¬ 
gende Fehlermeldung erzeugen: 

33, SYNTAX ERROR,00,00 

Womit wir den letzten der besprochenen Syntax-Fehler 
provoziert hätten. In Tabelle 3 haben wir alle Syntaxfehler 
mit kurzen Erläuterungen zusammengefaßt. 

Stolpersteine bei der Dateiverwaltung 


Neben Programmen kann die Floppy 1541 auch andere 
Daten auf einer Diskette speichern. Wenn Sie zum Beispiel 
ein Programm geschrieben haben, das die Adressen Ihrer 
Freunde verwaltet, sollten deren Daten für längere Zeit 


gespeichert werden, denn der Speicherinhalt des C64 wird 
beim Ausschalten gelöscht. Hierfür bietet die 1541 eine 
besondere Lösung: die sequentielle Datenspeicherung. 
Die Diskettenstation erlaubt es Ihnen, beliebige Daten in 
sequentiellen Dateien (SEQ-Dateien) abzulegen, um sie 
bei Bedarf jederzeit wieder in den Speicher des Computers 
zurückzuholen. Die Daten werden dabei der Reihe nach 
(sequentiell) auf die Diskette geschrieben und können 
ebenso wieder gelesen werden. Die Handhabung ist denk¬ 
bar einfach. Dennoch können dem Programmierer einige 
Mißgeschicke unterlaufen. 

Um die Fehlermeldungen, die die Floppy 1541 als Hilfe¬ 
stellung bereitstellt, zu erläutern, werden wir nun eine 
sequentielle Datei eröffnen. Selbst wenn Sie noch keine 
Erfahrung mit der Datenspeicherung auf der Floppy 1541 
gemacht haben, werden Sie den Gedankengängen leicht 
folgen können, da wir die Erklärungen so allgemein wie 
möglich formulieren, ohne speziell auf Befehlsstrukturen 
einzugehen. 

Die Handhabung einer Datei gliedert sich in vier Schritte. 
Sie erfolgt auf ähnliche Weise wie die Bedienung des Kom¬ 
mandokanals: 

1. Öffnen der Datei mit OPEN 

2. Schreiben von Daten mit PRINT # 

3. oder Lesen von Daten mit INPUT ■# oder GET# 

4. Schließen der Datei mit CLOSE 

Nachdem wir uns einen Namen für unsere Datei ausge¬ 
sucht haben (er soll »TESTDATEI« lauten), kann die Daten¬ 
speicherung beginnen. In unserer Zerstreutheit übergehen 
wir Punkt 1 der Liste und versuchen sofort, Daten auf die 
Diskette zu schreiben. Dieser äußerst gravierende Mangel 
fördert schon die erste Fehlermeldung zutage. Ohne daß 
der Fehlerkanal der Floppystation nach einer Fehlermel¬ 
dung abqerufen werden muß, beschwert sich der Compu¬ 
ter mit e:.' em »7FILE NOT OPEN ERROR«, da wir die Datei 
nicht mit OPEN geöffnet haben. Der Fehlerkanal der 
Floppy 1541 zeigt das gleiche Resultat: 

61, FILE NOT OPEN,00,00 

Die Datei muß zunächst unter einem Namen eröffnet 
werden. Unglücklicherweise befindet sich auf unserer Dis¬ 
kette bereits eine andere Datei mit dem gleichen Namen. 
Die Organisation der Diskette erlaubt jedoch zwei Dateien 
gleichen Namens nicht, und so werden wir mit dem näch¬ 
sten Fehler konfrontiert. Die Floppystation meldet: 

63, FILE EXISTS,00,00 

Ein neu gewählter Name (zum Beispiel »TESTFILE«) löst 
dieses Problem. Die gewünschten Daten können nach all 
den anfänglichen Schwierigkeiten endlich auf die Diskette 
geschrieben werden. 

Hat man die besagten Daten in einer sequentiellen Datei 
abgelegt, ist es besonders wichtig, den Abschluß der Arbeit 
mit dem Befehl CLOSE anzukündigen. Die Datei muß wie¬ 
der geschlossen werden. Ungeachtet dieser Tatsache 
schalten wir jedoch unseren Computer ab, ohne den letz¬ 
ten notwendigen Schritt zu tun. Die Datei wird damit nicht 
ordnungsgemäß geschlossen. 

Schließlich wollen wir die Daten wieder in den Computer 
lesen. Versehentlich legen wir eine andere Diskette in das 
Laufwerk, die unsere Datei nicht enthält. Beim Öffnen der 
Datei kann die Floppystation die gesuchten Daten nicht fin¬ 
den und antwortet mit einer Fehlermeldung: 

62, FILE NOT FOUND,00,00 

Die Datei wurde nicht gefunden. Parallel dazu gibt der 
C64 ebenfalls die gleiche Meldung aus: 

?FILE NOT F0UND ERROR 

Auch beim Laden von Programmen kann dieser Fehler 
auftreten, denn Programme sind eine besondere Art von 
Dateien (PRG-Dateien). Haben wir nach längerem Suchen 
endlich die richtige Diskette in das Laufwerk eingescho- 
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ben, können wir einen erneuten Versuch wagen. Leider 
geben wir dabei den falschen Filetyp an, denn die Floppy 
1541 kennt neben den Programmen (PRG) und den 
sequentiellen (SEQ) Dateien noch weitere Arten der Daten¬ 
speicherung. So kann man auch eine »User«-Datei (USR) 
eröffnen, die sich in der Handhabung jedoch nicht von 
SEQ-Dateien unterscheidet, und es gibt noch die relative 
Datenspeicherung (REL). Wir werden gleich auf sie einge- 
hen. 

Jedes Mal, wenn wir eine Datei öffnen, um Daten zu 
schreiben oder zu lesen, müssen wir den entsprechenden 
Dateityp angeben. Sie erinnern sich, daß unsere Datei vom 
Typ SEQ war. Wollen wir wieder darauf zugreifen, ist dieser 
Typ wiederholt anzugeben. Geschieht dies nicht, reagiert 
das Floppylaufwerk mit einem Fehler. Er kann provoziert 
werden, wenn wir unsere Datei mit dem Namen »TEST¬ 
FILE« nicht als SEQ- sondern beispielsweise als USR-Datei 
ansprechen wollen. Die Antwort des Laufwerks folgt nach 
kurzer Zeit: 

64, FILE TYPE MISMATCH,00,00 

Doch nun wollen wir unsere Datei ordnungsgemäß mit 
richtigem Filetyp und Namen zum Lesen von Daten öffnen. 
Obwohl wir alle Bedingungen beachtet haben, beginnt die 
rote Leuchtdiode erneut zu blinken. Eine weitere Meldung 
wartet auf dem Fehlerkanal: 

60, WRITE FILE OPEN,00,00 

Mit Schrecken erinnern wir uns, daß wir beim Anlegen 
der Datei das Schließen mit CLOSE vergessen haben. Sie 
wurde damit nicht ordnungsgemäß abgeschlossen und 
kann jetzt nicht mehr gelesen werden. Die obige Nachricht 
weist uns unmißverständlich darauf hin. Die ganze Mühe, 
die wir uns mit unserer Datei machten, war also umsonst. 
Mit viel Aufwand und guten Programmierkenntnissen kann 
man zwar eine Datei nachträglich schließen und auf diese 
Weise die verloren geglaubten Daten retten, doch ist dies 
ziemlich zeitaufwendig. 

Es ist sehr unwahrscheinlich, daß man all die Torturen, 
die wir eben spielerisch demonstriert haben, bei der Arbeit 
mit einer Datei in dieser Weise durchleben muß. Denn hat 
man sich etwas mit der Dateibedienung der Floppy 1541 
beschäftigt, kann man viele dieser Fehler von Beginn an 
vermeiden. 

Wir sind aber bei der Erläuterung der Fehlermeldungen 
zur Bearbeitung von Dateien noch nicht am Ende. In einem 
früheren Abschnitt dieses Artikels haben Sie kennenge¬ 
lernt, daß es neben der sequentiellen auch die relative 
Datenspeicherung gibt. Sie wird verwendet, wenn man 
schnell auf bestimmte Elemente der Daten zugreifen will. 
Diese Art der Datenspeicherung ist aber wesentlich kompli¬ 
zierter als etwa die sequentielle. Jedes Datenelement hat 
bei relativen Dateien eine begrenzte Länge und wird als 
Datensatz oder »Record« bezeichnet. Eine Datei kann nun 
viele dieser Datensätze enthalten, die alle aufsteigend 
numeriert werden. Hat man nun alle gewünschten Daten¬ 
sätze auf der Diskette gespeichert, kann man durch 
Angabe der Nummer den entsprechenden Datensatz 
direkt ansprechen, ohne etwa davor befindliche Daten 
überlesen zu müssen. 

Hierbei können besondere Fehler auftreten, die die 
Floppy 1541 auch mit besonderen Meldungen bedacht hat. 
Die Nummern dazu lauten 50, 51 und 52. 

Es kann beispielsweise Vorkommen, daß man auf einen 
nicht vorhandenen Datensatzzugreifen will. Die Floppysta- 
tion übermittelt uns dann die folgende Nachricht: 

50, RECORD NOT PRESENT,00,00 

Wir wissen somit, daß sich der Datensatz der angegebe¬ 
nen Nummer nicht in der Datei befindet. Schreibt man nun 
aber dennoch Daten hinein, ist die Floppy 1541 sehr hilfs¬ 
bereit und erweitert die Datei um diesen zusätzlichen 


Datensatz. Beim Speichern von Datensätzen muß man 
jedoch sehr vorsichtig sein. Es wurde bereits erwähnt, daß 
alle Datensätze nur eine bestimmte Länge (Anzahl von Zei¬ 
chen) haben dürfen. Ignoriert man diese Tatsache, sieht 
man sich mit einem weiteren Fehler konfrontiert: 

51, OVERFLOW IN RECORD,00,00 

Eine relative Datei kann jederzeit um beliebige Records 
erweitert werden. Irgendwann reicht aber die Speicherka¬ 
pazität der verwendeten Diskette nicht mehr aus, um neue 
Datensätze aufzunehmen. Wenn es soweit ist, teilt uns die 
Floppystation dies durch eine Fehlermeldung mit: 

52, FILE T00 LARGE,00,00 

Die Datei kann nicht mehr erweitert werden, da sie die, 
für relative Dateien vorgeschriebene, Maximallänge 
erreicht hat. Diese Meldung gilt aber nur bei relativen 
Dateien und ist nicht zu verwechseln mit der »72, DISK 
FULL,00,00«-Nachricht, deren Bedeutung Sie schon ken¬ 
nengelernt haben. 

Damit ist das Reservoir an Fehlermeldungen bezüglich 
der Dateibehandlung erschöpft. Sollte Ihnen bei der Fülle 
an Informationen schwindlig geworden sein, blicken Sie 
bitte auf Tabelle 4. Hier haben wir alle die in diesem Ab¬ 
schnitt besprochenen Fehlermeldungen noch einmal 
zusammengestellt. 

Fehler des Schicksals 


Alle Fehlermeldungen, die wir bisher bei unserer Exkursion 
durch die Welt der »Errors« erforscht haben, werden Ihnen 
im Laufe der Zeit oftmals begegnen, wenn Sie nur intensiv 
genug mit der Floppy 1541 arbeiten. Des weiteren zeichnen 
sie sich durch eine Gemeinsamkeit aus: Sie alle sind 
Anvy^nderfehler, das heißt Fehler, die auf das Unwissen 
oder die Unzulänglichkeit des Programmierers zurück¬ 
zuführen sind. Hat man sich genügend Wissen über die 
Floppystation angeeignet, wird man sie größtenteils ver¬ 
meiden können. 

Auf unserem Pfad, der uns jetzt weg von Programmen 
und Dateien in das Innere des Diskettenlaufwerks führt, 
werden wir jedoch Fehlermeldungen kennenlernen, deren 
Ursache meist nicht durch eine Fehlbedienung gegeben 
ist. Hier sind oft minderwertige Disketten mit beschädigter 
Magnetoberfläche oder fremde Umwelteinflüsse die Übel¬ 
täter, die das ordnungsgemäße Speichern von Daten 
behindern und so für Fehler sorgen. 

Hier ein Beispiel aus dem täglichen Leben: Sie laden 
eines Ihrer beliebtesten Spielprogramme und nehmen 
schon den Joystick zur Hand. Doch plötzlich gibt die 
Floppystation seltsame Geräusche von sich, während die 
rote Leuchtdiode, die zuvor konstant leuchtete, unregel¬ 
mäßig zu flackern beginnt. Schließlich ertönt ein scheuß¬ 
liches Rattern und das Laufwerk hält mit einer Fehlermel¬ 
dung an, obwohl man alle Eingaben in den Computer kor¬ 
rekt vorgenommen hat. Das Spielprogramm kann nicht 
mehr geladen werden und scheint für immer verloren. Wir 
werden diese Art von Fehlern im folgenden besprechen. 

Warum Formatieren? 


Um ihre Bedeutung genau zu verstehen, müssen wir uns 
zunächst mit der Organisation einer Diskette bei der Floppy 
1541 beschäftigen. Wir werden kennenlernen, auf welche 
Weise unser Diskettenlaufwerk Programme und andere 
Daten auf einer Diskette ablegt. 

Wenn mehrere Programme auf einer Kassette gespei¬ 
chert werden sollen, läuft dies nach einem einfachen 
Schema ab. Die Daten werden der Reihe nach auf das Mag- 
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netband geschrieben. Ist ein Programm zu Ende, kann 
gleich dahinter ein neues Programm gespeichert werden. 
Man kann dies fortführen, bis die Kassette abgelaufen ist. 
Durch Abspielen des gesamten Bandes oder manuelles 
Vor- und Zurückspulen läßt sich nach einem bestimmten 
Programm suchen, was allerdings sehr lange dauern kann. 

Die »Innereien einer Diskette 


Eine Diskette kann ebenfalls mehrere Programme enthal¬ 
ten. Das einfache Prinzip der Kassettenspeicherung ist 
aber auf der runden Magnetscheibe einer Diskette kaum zu 
verwirklichen. Des weiteren zeichnet sich ein Floppylauf- 
werk durch schnelle Zugriffszeiten auf alle Daten aus; das 
heißt, ein Programm, das irgendwo auf der Diskette abge¬ 
legt ist, kann durch Angabe seines Namens sofort gefun¬ 
den und in den Speicher des Computers geladen werden. 
Dies bedarf einer geregelten Organisation, die es der 
Floppystation erlaubt, sich schnell und problemlos auf der 
Diskette zurechtzufinden. Zu diesem Zweck müssen sich 
auf der Magnetoberfläche Markierungen befinden, die 
dem Diskettenlaufwerk bei der Orientierung behilflich sind. 
Sie sind von Gerät zu Gerät verschieden und bestimmen 
das Format einer Diskette. Um die für die Floppy 1541 not¬ 
wendigen Markierungen auf eine Diskette zu bringen, muß 
diese formatiert werden. Vielleicht wissen Sie, daß die 
Floppystation einige Zelt dazu benötigt (etwa 90 Sekun¬ 
den). Sehen wir uns einmal kurz an, was dabei mit der Dis¬ 
kette geschieht. 

Beim Formatieren wird die Magnetscheibe der Diskette 
in 35 (magnetische) Spuren aufgeteilt, die konzentrisch um 
das Mittelloch angeordnet sind. Sie erhalten von außen 
nach innen die Nummern 1 bis 35. Während sich die Dis¬ 
kette dreht, kann der Schreib-/Lesekopf, von einem kleinen 
Motor geführt, auf jede dieser Spuren gelangen, um dort 
Daten zu schreiben oder zu lesen. Da eine solche Spur 
(englisch: Track) als Speichereinheit noch zu groß ist, um 
bequem bearbeitet werden zu können, wird sie in noch klei¬ 
nere Untereinheiten zerlegt: die Sektoren. Ihre Anzahl kann 
von Spur zu Spur unterschiedlich sein, da deren Länge auf 
der Diskette von außen nach innen abnimmt. Pro Spur wer¬ 
den die Sektoren ab Null aufsteigend numeriert. Jeder Sek¬ 
tor kann somit durch eine Spur- und Sektornummer eindeu¬ 
tig bestimmt werden. 

Auch innerhalb eines Sektors herrscht eine strenge Ord¬ 
nung. Nach einem Vorspann (Kopf oder auch »Header«), 
der wichtige Daten über den entsprechenden Sektor ent¬ 
hält, folgt der Datenblock. Hier werden nun endlich die 
Daten abgelegt. Einen ausführlichen Kurs darüber finden 
Sie übrigens in unserem Floppy-Sonderheft 9/87. Jeder 
Sektor kann 254 Byte aufnehmen. Da ein Programm in der 
Regel länger ist, wird es beim Speichern auf mehrere 
Sektoren verteilt. 

Anschließend wird beim Formatieren auf der Diskette ein 
Inhaltsverzeichnis angelegt, das die Namen der zukünftig 
gespeicherten Dateien aufnehmen wird. Daneben wird es 
wichtige Daten enthalten, die der Floppystation bei der 
Suche nach einer bestimmten Datei behilflich sind. Das 
Directory, wie das Inhaltsverzeichnis einer Diskette auch 
genannt wird, benötigt die gesamte Spur 18. 

Man wird verstehen, daß bei all der komplizierten Organi¬ 
sation bereits ein geringer Fehler (oft genügt ein falsches 
Bit) größte Probleme ergeben kann. Wie bei der Speiche¬ 
rung auf der Datasette trifft die Floppy 1541 deshalb einige 
Vorkehrungen, um eventuelle Fehler möglichst zu vermei¬ 
den. 

Wird zum Beispiel infolge eines SAVE-Befehles vom 
Computer ein Sektor auf einer Diskette mit Daten beschrie¬ 


ben, wird sogleich automatisch überprüft, ob alle Bytes ord¬ 
nungsgemäß gespeichert wurden (VERIFY). Daneben 
werden, ähnlich wie bei der Kassettenspeicherung, Prüf¬ 
summen über die entsprechenden Daten erstellt und bei 
einem Lesezugriff mit den geladenen Bytes verglichen. 
Man findet jeweils eine Prüfsumme im Kopf und im Daten¬ 
block eines Sektors. 

Man sieht, daß für die Datensicherheit gut gesorgt ist. 
Insbesondere das automatische, floppyinterne VERIFY 
beim Schreiben eines jeden Sektors verhindert, daß die 
Daten bereits fehlerhaft geschrieben werden. Doch trotz all 
dieser Vorkehrungen können Probleme bei der Datenspei¬ 
cherung auf einer Diskette entstehen. 

Obgleich die Ursachen eines Fehlers meist die gleichen 
sind (zum Beispiel fehlerhafte Disketten oder fremde 
Umwelteinflüsse), können sie in den verschiedensten 
Bereichen auftreten, die die Floppy 1541 sorgsam zu unter¬ 
scheiden weiß. Man faßt sie allgemein unter dem Begriff 
»Lesefehler« zusammen, da durch irgendwelche Lesepro¬ 
bleme einer Diskette gewisse Daten oder Markierungen 
nicht korrekt identifiziert werden können. Die Floppy 1541 
kennt insgesamt 9 dieser Lesefehler, von denen 6 die allge¬ 
meine Bezeichnung »READ ERROR« haben. Sie treten nur 
beim Lesen von Daten auf. Zwei Fehlermeldungen tragen 
den Namen »WRITE ERROR«, da sie nur beim Schreiben 
von Daten, wie zum Beispiel bei SAVE, in Erscheinung tre¬ 
ten. Wir haben sie in sortierter Reihenfolge in Tabelle 5 
abgedruckt. Dort finden Sie auch den neunten Lesefehler 
mit dem Namen »DISK ID MISMATCH ERROR«. 

Diese Gruppe von Fehlern läßt sich in zwei Typen unter¬ 
teilen: die »Soft« und die »Hard«-Errors, was Sie ebenfalls 
der Tabelle entnehmen können. 

Obwohl alle Lesefehler größte Probleme bereiten, sind 
die Scft Errors (»weiche« Fehler) in unserer Liste etwas 
harmloser als die Hard-Errors (»harte« Fehler). In den mei¬ 
sten Fällen können bei Fehlern dieses Typs die Daten des 
betroffenen Sektors noch relativ einfach und ohne gravie¬ 
rende Verluste gerettet werden. Ein »READ ERROR« der 
Nummer 22 weist beispielsweise darauf hin, daß der Hea¬ 
der eines Sektors zwar einwandfrei gelesen werden 
konnte, die Floppystation aber den normalerweise folgen¬ 
den Datenblock nicht gefunden hat. Die Meldung kann zum 
Beispiel lauten: 

22, READ ERROR,14,09 

Meist hat hier eine wichtige Markierung im Datenblock 
nicht den richtigen Wert, der Datenblock selbst ist aber kor¬ 
rekt. Mit etwas Programmieraufwand kann der Sektor noch 
gerettet werden, was uns an dieser Stelle aber nicht 
genauer interessieren soll. 

Der »fehlerteufel« schlägt zu 


Bei den Fehlermeldungen bekommen nun auch die beiden 
Zahlen hinter dem Klartext, die bisher meistens auf Null 
standen, eine Bedeutung. Sie geben die Spur- und Sektor¬ 
nummer des Blocks an, in dem der Fehler aufgetreten ist. 
In unserem Beispiel ist es der Sektor 9 auf Spur 14. Wir wer¬ 
den diesen Sektor ab jetzt weiterhin als Beispiel verwen¬ 
den. 

Meldet die Floppystation 

23, READ ERROR,14,09 

handelt es sich ebenfalls um einen »Soft-Error«. Eine fal¬ 
sche Prüfsumme war hier die Ursache. Wie Sie schon wis¬ 
sen, enthält ein Sektor zwei Prüfsummen. Hier ist die Prüf¬ 
summe des Datenblocks gemeint, die mit der der gelese¬ 
nen Datenbytes nicht übereinstimmt. In diesem Fall besteht 
die Hoffnung, daß lediglich die Prüfsumme falsch ist, die 
Daten jedoch korrekt geschrieben wurden. Einige Pro- 
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gramme, die sich mit der Diskettenbehandlung beschäfti¬ 
gen, wie zum Beispiel bestimmte Kopierprogramme, erlau¬ 
ben es deshalb, einen Sektor trotz eines »23, READ 
ERROR« zu lesen, um die Prüfsumme anschließend zu 
korrigieren. Meist sind jedoch fehlerhafte Datenbytes die 
Sünder. Die eben beschriebene Korrektur bleibt dann ohne 
Erfolg. 

Ein Prüfsummenfehler im Sektor-Kopf kann ohne großen 
Aufwand nicht mehr repariert werden. Er hat einen harten 
Lesefehler zur Folge: 

27, READ ERROR,14,09 

Ein weiterer »Soft-Error« ist vom Typ »WRITE ERROR«. 
Er tritt bereits beim Schreiben von Daten auf. Wurde bei der 
Vergleichskontrolle eines eben gespeicherten Sektors ein 
Fehler in den Datenbytes entdeckt, meldet die Floppy- 
station: 

25, WRITE ERROR,14,09 

Oftmals liegt dieser Meldung eine fehlerhafte Magnetbe¬ 
schichtung der Diskette zugrunde. Doch ist der Fehler nicht 
besonders tragisch, da sich die Daten, zum Beispiel ein 
Programm, in der Regel noch im Speicher des Computers 
befinden. Man kann also einen weiteren Speicherversuch 
auf einer anderen Diskette vornehmen. Hat man auf diese 
Weise eine »Problemdiskette«, erkannt, ist es ratsam, die 
restlichen Dateien von dieser Diskette auf einen neuen 
Datenträger zu kopieren. Vorsicht ist in solchen Fällen bes¬ 
ser, als der Verlust sämtlicher Daten auf der schadhaften 
Diskette. 

Harte Probleme mit »harten« Fehlem 


Bei den »Soft-Errors« ist der Header (Kopf) eines Sektors in 
der Regel noch in Ordnung. Der Sektor kann auf der Dis¬ 
kette also noch gefunden werden. Handelt es sich jedoch 
um einen »Hard-Error« ist schon der Vorspann des betref¬ 
fenden Sektors nicht mehr lesbar, wie es beispielsweise der 
Fehler mit der Nummer 20 anzeigt: 

20, READ ERROR,14,09 

Er besagt, daß die Floppy 1541 den Kopf eines Sektors 
nicht ausfindig machen konnte. Der Fehler kann sich dabei 
entweder auf nur einen Sektor oder eine ganze Spur bezie¬ 
hen. Ist die gesamte Spur betroffen, sind die darauf befind¬ 
lichen Daten normalerweise für immer verloren, wie es 
auch beim »21, READ ERROR« der Fall ist. Hier ist es der 
Floppystation unmöglich, eine für das Lesen und Schrei¬ 
ben wichtige Markierung zu finden. Auch bei diesem Fehler 
braucht man sich keine Hoffnung auf eine Rettung der 
Daten machen. 

Ein 

29, DISK ID MISMATCH,l4,09 

tritt auf, wenn die »ID« (»IDentifizierung«) eines Sektors 
nicht mit der ID der Diskette übereinstimmt, die Sie beim 
Formatieren angegeben hatten. Bei diesem Fehler ist meist 
ein zerstörter Sektor-Header die Ursache. 

Relativ selten ist der Lesefehler mit der Nummer 24 zu 
finden. Er bezieht sich auf die Codierung der Daten, bevor 
sie in einen Sektor auf der Diskette geschrieben werden. 
Aus organisatorischen Gründen werden die Daten nicht im 
Originalzustand gespeichert, sondern zuvor in einer gewis¬ 
sen Weise codiert. Nach dem Lesen müssen sie selbstver¬ 
ständlich wieder recodiert, das heißt zurückübersetzt wer¬ 
den. Im Normalfall entstehen hierbei keine Probleme. Im 
Fehlerfall können Werte auftreten, die nicht entziffert wer¬ 
den können. Die Antwort der Floppy 1541 lautet dann: 

24, READ ERROR,14,09 

Ebenso rar wie der Fehler 24 ist der zweite »WRITE 
ERROR« in der Tabelle 5. Er hat die Nummer 28. Hier wurde 
ein Sektor von einem davor befindlichen einfach über- 


schrieben, so daß die Floppystation die Anfangsmarkierun¬ 
gen dieses Sektors nicht mehr finden kann. Dieser Fehler 
kann auftreten, wenn sich die Diskette zu schnell dreht, weil 
die Geschwindigkeitsregelung des Laufwerkmotors ausge¬ 
fallen ist. Die Sektoren werden dann zu »lang« und über¬ 
schreiben sich gegenseitig. 

Bleiben zu guter Letzt noch einige Fehlermeldungen, die 
nicht so recht in eine unserer Gruppen passen wollen. Drei 
dieser Fehlermeldungen werden bei der normalen Anwen¬ 
dung der Floppy 1541 wohl nicht auftreten. Der fortgeschrit¬ 
tene Programmierer, der einige Direkteingriffe auf einer 
Diskette vornimmt, wird ihnen öfter begegnen. Das sind die 
Fehler mit den Nummern 65, 66 und 71, die wir hier nicht 
näher erläutern wollen. Sie sind aber in unserer Tabelle 6 
dennoch aufgelistet. Lediglich der Fehler der Nummer 67 
kann häufiger auftreten. Die Meldung lautet dann folgen¬ 
dermaßen: 

67, ILLEGAL TRACK 0R SECT0R,l4,09 

Da ein Programm meist länger ist als 254 Byte, muß es 
auf mehrere Sektoren verteilt werden. Damit die Floppy¬ 
station nach dem Lesen eines Sektors weiß, in welchem 
Folgesektor das Programm oder die Datei fortgesetzt wird, 
enthalten die ersten zwei Byte des Datenblocks eines Sek¬ 
tors stets die Spur- und Sektornummer des darauffolgen¬ 
den Programmteils. Durch unsachgemäßen Zugriff auf die¬ 
sen Sektor ist es möglich, daß dieser Zeiger auf einen Sek¬ 
tor zeigt, der überhaupt nicht existiert. Spur 75 ist beispiels¬ 
weise bei der Floppy 1541 nicht vorhanden, da die höchste 
Spur die Nummer 35 besitzt. Ein »ILLEGAL TRACK OR 
SECTOR«-Fehler entsteht. Wichtig ist dabei noch zu wis¬ 
sen, daß auch eine unerlaubte Sektornummer diese Feh¬ 
lermeldung zur Folge hat. 

An dieser Stelle ist es bestimmt kein »Fehler«, das Thema 
der’Fbnlermeldungen zu beenden. Manche Bereiche, die 
wir in diesem Bericht angeschnitten haben, werden sicher¬ 
lich Fragen offenlassen. Zu ihrer Beantwortung weisen wir 
auf einschlägige Literatur wie »Die Floppy 1541« von 
Markt&Technik hin, die sich wesentlich intensiver mit die¬ 
sem oder jenem Problem der Floppy 1541 auseinanderset¬ 
zen kann. Die große Anzahl an Fehlermeldungen läßt die 
Komplexität der 1541 nur erahnen. Vielleicht ist das aber 
ein Ansporn, sich näher mit diesem interessanten Periphe¬ 
riegerät zu beschäftigen. (Michael Thomas/ks) 


Bit 

Wert von 

ST wenn 
gesetzt 

Bedeutung 

0 

1 

Für die Datasette ohne Bedeutung 

1 

2 

Für die Datasette ohne Bedeutung 

2 

4 

zu kurzer Block 

3 

8 

zu langer Block 

4 

16 

Vergleichsfehler von ersten Daten und Kopie 

5 

32 

Prüfsummenfehler 

6 

64 

EOF; Ende der Datenübertragung 

7 

128 

EOT; Bandende 


Tabelle 1. Die Bitbelegung der Statusvariable ST 


Nummer 

Fehler 

Bedeutung 

00 

OK 

Befehl wurde ordnungsgemäß 
ausgeführt 

01 

FILES SCRATCHED.XX 

XX Dateien wurden gelöscht 

26 

WRITE PROTECT ON 

Diskette ist durch eine Schreib¬ 
schutzplakette vor dem Überschrei¬ 
ben geschützt 

72 

DISK FULL 

Diskette ist voll oder es wurden 
bereits 144 Dateien gespeichert 

73 

CBM DOS V2.6 1541 

Einschaltmeldung; Diskette mit 
Fremdformat eingelegt 


Tabelle 2. Ein Teil der Fehlermeldungen der 1541 
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Nummer 

Fehler 

Bedeutung 

30 

SYNTAX ERROR 

allgemeiner Syntaxfehler 

31 

SYNTAX ERROR 

ungültiger Befehl 

32 

SYNTAX ERROR 

Befehlszeile zu lang 

33 

SYNTAX ERROR 

unerlaubte Verwendung eines 
Jokerzeichens 

34 

SYNTAX ERROR 

Dateiname ist nicht angegeben 

39 

SYNTAX ERROR 

ungültiger Befehl 


Tabelle 3. Die Floppy 1541 kennt sechs »SYNTAX ERROR« 


Nummer 

Fehler 

Bedeutung 

60 

WRITE FILE OPEN 

Zugriff auf eine nicht geschlossene 
Datei 

61 

FILE NOT OPEN 

Datei ist nicht geöffnet 

62 

FILE NOT FOUND 

Datei wurde nicht gefunden 

63 

FILE EXISTS 

Datei mit angegebenem Namen 
existiert bereits 

64 

FILE TYPE MISMATCH 

falscher Dateityp angegeben 

Nur bei relativen Dateien 


50 

RECORD NOT PRESENT 

Datensatz der angegebenen Num¬ 
mer existiert nicht 

51 

OVERFLOW IN RECORD 

Datensatz zu lang 

52 

FILE TOO LARGE 

Datei kann nicht erweitert werden, 
da Diskette voll 


Tabelle 4. Die möglichen Fehler bei der Arbeit mit Dateien 


Nummer 

Fehler 

Typ 

Bedeutung 

20 

READ ERROR 

hard 

Blockheader nicht gefunden 

21 

READ ERROR 

hard 

Sync-Markierung nicht gefunden 

22 

READ ERROR 

soft 

Datenblock nicht gefunden 

23 

READ ERROR 

soft 

Prüfsummenfehler in Datenblock 

24 

READ ERROR 

hard 

Fehler bei der GCR-Recodierung 

25 

WRITE ERROR 

soft 

Fehler beim Verifizieren 

27 

READ ERROR 

hard 

Prüfsummenfehler im Sektor- 
Header 

28 

WRITE ERROR 

hard 

Block zu lang; nächster Block 
wurde überschrieben (Hardware- 
Defekt) 

29 

DISK ID MISMATCH 

hard 

falsche ID im Sektor-Header 


Tabelle 5. Lesefehler - der Schrecken aller Programmierer. 
Nicht immer liegt es an einer defekten Diskette. 


Nummer 

Fehler 

Bedeutung 

65 

NO BLOCK 

Block bereits belegt 

66 

ILLEGAL TRACK 

Zugriff auf ungültige Spur oder 


OR SECTOR 

Sektor 

67 

ILLEGAL TRACK 

Zeigerbytes in Datenblock zeigen 


OR SECTOR 

auf ungültige Spur oder Sektor 

70 

NO CHANNEL 

Kanal bereits belegt 

71 

DIR ERROR 

zerstörte BAM 


Tabelle 6. Außenseiter: Diese Lesefehler passen in keine 
der vier Gruppen 


Floppyfehler dtfangen 


Manchem Programmierer sträuben sich die 
Haare, wenn er das Wort »Fehlermeldung« hört. 
Manchmal kann diese Einrichtung des Com¬ 
puters jedoch sehr sinnvoll angewendet werden. 

T ritt während der Programmausführung ein Fehler auf, 
so bricht der Computer mit einer mehr oder weniger 
deutlichen Fehlermeldung ab. Für Fehler beim Zugriff 
auf die Diskette gilt dies jedoch nicht. Hier blinkt lediglich 
eine Leuchtdiode am Laufwerk und das Programm läuft oft 
weiter. Dies können wir für ein programmiertes Abfangen 
solcher Fehler ausnutzen. Allerdings benötigen wir dazu 
mehr Informationen. Das Floppylaufwerk hält diese für uns 
bereit - wir holen sie mit der Anweisung 
10 OPEN 14,8,15: INPUT# l4,A,B$,C,D:CL0SE 14 
ab. Das Blinken am Laufwerk hört auf, und in den Variablen 
sind folgende Informationen gespeichert: 

A: Nummer des Fehlers C: Spur 

B$: Fehlerbezeichnung im Klartext D: Sektor 

Jedem Fehler ist eine bestimmte Nummer zugeordnet. 
So hat die Meldung »File not found« die Nummer 62. »OK« 
und 0 sind Kennzeichen eines fehlerfreien Zugriffs auf die 
Diskette. Durch die Angabe der Spur- und Sektornummer 
erfahren wir außerdem, an welcher Stelle auf der Diskette 
der Fehler aufgetreten ist. Diese Angaben werden jedoch 
erst bei bestimmten Diskettenzugriffen interessant. 

Beispiele für die Behandlung der häufiger auftretenden 
Fehler sind in unserem Programm (Listing 1) dargestellt. 

Das Programm arbeitet mit sequentiellen Dateien: Ein¬ 
gabe und Speicherung von Adressen auf Diskette. Zu 
Beginn des Programms muß ein Dateiname angegeben 
werden. Befindet sich unter diesem Namen bereits eine 


Datei auf der Diskette, so werden alle gespeicherten Adres¬ 
sen auf dem Bildschirm ausgegeben. Das Programm ist 
nicht sehr komfortabel; dient aber auch nur zur Demonstra¬ 
tion der Fehlerbehandlung. 

Im Teil A (Zeile 1000 bis 1530) wird eine Tabelle mit allen 
Fehlernummern angelegt, auf die das Programm reagieren 
soll. Die Variable AF enthält die Anzahl der Nummern. 
Außerdem muß an dieser Stelle der OPEN-Befehl für das 
Lesen der Fehlermeldung stehen. 

Teil E (ab Zeile 9000) holt die Fehlermeldung und ver¬ 
gleicht sie mit den gespeicherten in der Tabelle. Die ersten 
vier Fehler werden gleich hier abgefangen. Dies sind Feh¬ 
ler, deren Behandlung unabhängig vom Programm gleich 
sind. So wird auf das Fehlen einer Diskette im Laufwerk 
meist mit der Aufforderung, eine solche einzulegen, rea¬ 
giert. Ist die Fehlernummer in der Tabelle nicht enthalten, 
bricht das Programm ab. 

Dateien werden wie Programme mit ihrem Namen auf 
der Diskette gespeichert. Durch die OPEN-Anweisung in 
Teil B teilen wir dem Computer unter anderem mit, welche 
Datei wir lesen möchten. Interessant sind in diesem Pro¬ 
gramm nach der automatischen Fehlerbehandlung nur 
zwei Meldungen. 

1. Fehlernummer 0: 

Die Datei ist vorhanden. Sie wird daraufhin gelesen und 
die Adressen auf dem Bildschirm ausgegeben. 

2. Fehlernummer 62: 

Die Datei ist nicht vorhanden. Wir können gleich mit der 
Eingabe der Adressen über die Tastatur beginnen. 

Alle anderen Fehler sind schon im Teil E abgefangen wor¬ 
den. Zur Überprüfung, ob diese Fehler beseitigt wurden, 
wird die OPEN-Anweisung erneut ausgeführt. 
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Teil C (ab Zeile 2200) befaßt sich mit der Eingabe der 
Adressen. Die Gestaltung dieses Teils ist abhängig von 
dem zu lösenden Problem. Wir haben deshalb dort keine 
ondere Fehlerbehandlung vorgesehen. 

Mit der OPEN-Anweisung in Teil D (ab Zeile 2400) teilen 
wir dem Computer mit, unter welchem Namen die Adres¬ 
sen gespeichert werden sollen. Wiederum sind zwei Mel¬ 
dungen interessant. 

1. Fehlernummer 0: 

Die Datei ist nicht vorhanden. Wir geben die Adressen 
deshalb gleich aus und legen damit die Datei an. 

2. Fehlernummer 63: 

Die Datei existiert bereits. In diesem Fall geben wir ihr 


einen anderen Namen. Der alte Name wird lediglich um 
den Zusatz ».BAK« erweitert. Tritt dann bei der Speicherung 
der Adressen ein schwerwiegender Fehler auf (Stromaus¬ 
fall), so haben Sie immer noch die alte Datei (mit dem 
Zusatz). 

Teil A und Teil E können Sie fast unverändert in Ihre eige¬ 
nen Programme übernehmen. Ändern Sie den Inhalt von 
AF entsprechend der von Ihnen gewählten Anzahl von Feh¬ 
lernummern. Die automatisch in Teil E abzufangenden 
Fehler müssen die ersten in der Liste der DATA-Zeilen sein. 
Programmieren Sie für jeden dieser Fehler im Teil E ein ent¬ 
sprechendes Unterprogramm und ergänzen Sie die Reihe 
der Sprungadressen in Zeile 9100. (pa) 


1000 

REM *************************** TEIL 


2520 GOTO 2400 

<246 > 


A *** 

v 048 > 

2600 PRINTül.AA 

<097> 

1001 


<215> 

2610 FOR 1=1 TO AA 

<241 > 

1010 

AF=6 • REM ANZAHL FEHLERMELD 


2620 PRINT#1,N$(I>:PRINTH1.S$(I) 

<006> 


UNGEN 

<089> 

2630 PRINTBl,0$(I>:PRINT#1,T$(I) 

<113> 

1020 

DIM EN(AF) 

< 203> 

2640 NEXT I 

<184> 

1100 

DATA 26 - REM SCHREIBSCHUTZ 

<213> 

2650 CLOSE 1 : CLOSE 14 

<150> 

1110 

DATA 72 : REM DISKETTE VOLL 

<061> 

2660 PRINT "PROGRAMM BEENDET" 

<155> 

1120 

DATA 74 : REM KEINE DISKETTE IM LAUFW 


3000 END 

<208> 


ERK 

< 175> 

3010 : 

< 192> 

1130 

DATA 64 •• REM DATEITYP FALSCH 

< 115 > 

9000 REM *************************** TEIL 


1140 

DATA 62 : REM DATEI NICHT GEFUNDEN 

<:059> 

E *** 

<192> 

1150 

DATA 63 : REM DATEI EXISTIERT BEREITS 

< 188> 

9001 : 

<087> 

1500 

FOR 1=1 TO AF 

<150> 

9010 INPUTW14.A,B$,C,D 

<223 > 

1510 

READ EN(I) 

<007> 

9020 IF A=0 THEN RETURN 

<027> 

1520 

NEXT I 

<078> 

9030 PRINT 

<242> 

1530 

OPEN 14,8,15 

< 146> 

9040 19=1 

< 213 > 

1540 


s248> 

9050 IF EN<19 >=A THEN 9100 

<124> 

1600 

REM *************************** TEIL 


9060 19=19+1 

< 192> 


B *** 

<146> 

9070 IF I9<=AF THEN 9050 

<212> 

1601 


<053> 

9080 PRINT Ai" ”;B$;"C2SPACE>";“SPUR:";C i “ 


1610 

DIM N$< 300 >,S$(300),O$(100),T$<100 > 

<092> 

"i"SEKTOR:" ;ß 

<248> 

2000 

AA=0 : REM ANZAHL ADRESSEN 

<034> 

9090 STOP : REM PROGRAMMABBRUCH 

< 106> 

2100 

PRINT CHR$(147) : REM BILDSCHIRM LOES 

chen 5 

9100 ON 19 GOTO 9200,9300,9400.9500 

9113 '.ETURN 

<081 > 
<022> 

2110 

INPUT "DATEINAME: ";DN$ 

<028> 

9120 : 

<206> 

2120 

PRINT 

< 190> 

9200 REM *** FEHLERMELDUNG 1 

<174> 

2130 

OPEN 1,8,8.DN$+“,S,R" 

<097> 

9210 PRINT "DIE DISKETTE IST SCHREIBGESCHU 


2140 

GOSUB 9000 

<128> 

ETZT" : PRINT 

<185> 

2150 

IF A=62 THEN 2300 : REM DATEI NICHT D 


9220 PRINT "WENN SIE MIT DER DISKETTE ARBE 



A 

< 143> 

ITEN WOLLEN," 

<043> 

2160 

IF A=0 THEN 2200 : REM DATEI VORHAND 


9230 PRINT "C2SPACE3DANN ENTFERNEN SIE DEN 



EN 

<094> 

SCHUTZ" 

<072> 

2170 

CLOSE 1 

< 149> 

9240 GOSUB 9900 

<004> 

2180 

GOTO 2100 : REM NOCH MAL VERS 


9250 RETURN 

<164> 


UCHEN 

<052> 

9260 : 

<092> 

2190 


<134> 

9300 REM *** FEHLERMELDUNG 2 

<028> 

2200 

REM *************************** TEIL 


9310 PRINT "DIE DISKETTE ODER DAS INHALTSV 



c *** 

<242> 

ERZEICHNIS SIND VOLL" 

<164> 

2201 


<145> 

9320 PRINT "C2SPACEDLEGEN SIE EINE ANDERE 


2210 

INPUTtf 1, AA 

<135> 

DISKETTE EIN" 

<169> 

2220 

FOR 1=1 TO AA 

<103> 

9330 GOSUB 9900 

<094> 

2230 

INPUTöl,N$(I>,S$(I).0$(I>.T$(I) 

<134> 

9340 RETURN 

<254> 

2240 

PRINT N$(I) : PRINT S$(I) 

<165> 

9350 : 

<182> 

2250 

PRINT 0*<I> : PRINT T$(I) 

<187> 

9400 REM *** FEHLERMELDUNG 3 

<136> 

2260 

PRINT 

<074> 

9410 PRINT "ES BEFINDET SICH KEINE FORMATT 


2270 

NEXT I 

<066> 

IERTE" 

<010> 

2300 

CLOSE 1 

<023> 

9420 PRINT "C2SPACE3DISKETTE IM LAUFWERK" 

<071 > 

2310 

AA=AA+1 

<080> 

9430 GOSUB 9900 

< 194> 

2320 

INPUT "NAME: ";N$(AA) 

< 134> 

9440 RETURN 

<098> 

2330 

INPUT "STRASSE: ";S$(AA) 

<140> 

9450 : 

<026> 

2340 

INPUT "ORT: ";0$(AA) 

<081 > 

9500 REM *** FEHLERMELDUNG 4 

<246> 

2350 

INPUT "TELEFON: ";T$<AA> 

<159> 

9510 PRINT "DIESE DATEI EXISTIERT BEREITS 


2360 

PRINT 

<176> 

ALS PROGRAMMDATEI" 

<114> 

2370 

INPUT "WEITER MACHEN <J/N)";E$ 

<069> 

9520 PRINT "C2SPACE3AUF DER DISKETTE" 

<037> 

2380 IF E$="J" THEN GOTO 2310 

<136> 

9530 PRINT "WAEHLEN SIE EINEN ANDEREN NAME 


2390 


<080> 

N" 

<044> 

2400 

REM *************************** TEIL 


9540 GOSUB 9900 

<050> 


D *** 

<192> 

9550 RETURN 

<210> 

2401 


<091 > 

9560 : 

<138> 

2410 

OPEN 1,8,8,DN$+",S,W" 

<133> 

9900 REM *** TASTE ABWARTEN 

<219> 

2420 

GOSUB 9000 

<154> 

9910 PRINT : PRINT "WENN FERTIG - TASTE DR 


2430 

IF A=0 THEN 2600 

<081 > 

UECKEN" 

<228> 

2440 

CLOSE 1 

<165> 

9920 GET E$ : IF E$="" THEN 9920 

<035 > 

2450 

IF A<>63 GOTO 2400 

< 180> 

9930 RETURN 

<080> 

2500 

PRINTH14,"S:"+I)N$ + ".BAK" 

<090> 

9940 : 

<008> 

2510 

PRINT«14, "R:"+DN$ +". BAK= " +DN$ 

<059> 




Listing 1. Abfangen von Floppyfehlern beim Verwalten von Adressen 
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Leichter Einstieg in Gees 


Liegt Ihrem neuen C64 eine Diskette mit der 
Aufschrift »Geos« bei und Sie wissen noch nicht 
recht, was Sie als Einsteiger damit anfangen 
sollen? Dann wird Ihnen dieser Artikel zeigen, wie 
Sie aus Geos den größtmöglichen Nutzen ziehen. 

L eider läßt sich in einem einzigen Artikel nur ein erster 
Einblick in die Geos-Welt vermitteln. Um Geos bis ins 
letzte Bit auszureizen, ist schon erheblich mehr Platz 
erforderlich. Solche detaillierten Informationen finden Sie 
in unserem Geos-Kurs ab Ausgabe 2/87. 

Durch diesen Artikel erhalten Sie eine genaue Vorstel¬ 
lung davon, inwiefern Ihnen Geos nützlich sein kann. 

Die Bezeichnung »Geos« 


Wie zahlreiche Produktbezeichnungen ist Geos eine 
Abkürzung. »Geos« steht für »Graphics Environment Oper- 
ating System«, was man recht frei als »grafisches Betriebs¬ 
system und Benutzeroberfläche« übersetzen würde. »Gra¬ 
fische Benutzeroberfläche« bedeutet, daß man dem Com¬ 
puter keine Befehle im Klärte!« mitteilt (über Tastaturein¬ 
gaben), sondern anhand von grafischen Symbolen mit 
dem Joystick oder einem anderen Eingabegerät die 
gewünschten Funktionen auslöst. Der Vorteil ist unbestrit¬ 
ten die leichtere Erlernbarkeit des Umgangs mit einem 
neuen Programm, denn von solchen Symbolen läßt sich 
zumeist auch ohne große Phantasie die Bedeutung ablei¬ 
ten. Ein Beispiel: Um Daten zu löschen, muß man im 
C64-Betrieb ohne Geos Befehlssequenzen 
OPEN 15,8,15,"S:NAME":CL0SE 1 

eintippen; unter Geos sehen Sie einen Papierkorb, in den 
man am Bildschirm die unerwünschten Daten »hinein¬ 
wirft«. 

Eine solche grafische Orientierung war bislang nur neue¬ 
ren Geräten wie dem Atari ST und der AMIGA-Serie Vorbe¬ 
halten. Dank Berkeley Softworks und Commodore steht 
nun mit Geos auch für den C64 eine solche Software zur 
Verfügung. 

So startet man Geos 


Da Geos nicht fest im C64 eingebaut ist, steht es unmittel¬ 
bar nach dem Einschalten auch noch nicht im Speicher. 
Deshalb muß die Geos-Systemdiskette, die dem C64 bei¬ 
liegt, in das Diskettenlaufwerk eingeschoben und folgen¬ 
der Befehl eingegeben werden: 

LOAD ":#",8,1 (RETURN) 

Auf diese Anweisung hin beginnt der Ladevorgang (bei 
Geos auch »Bootvorgang« genannt). 

Bald erscheint der Text »BOOTING Geos« und - sofern 
alles geklappt hat - das Einschaltbild von Geos (Bild 1). 

Sollte sich dieser Bildschirmaufbau jedoch nicht zeigen, 
sondern das System beim Laden »abstürzen«, so ist ein 
erneuter Bootversuch zu unternehmen. Diese kleine Unzu¬ 
länglichkeit sollte jedoch nicht vom Geos-Gebrauch an sich 
abschrecken, da er alles andere als problematisch ist. 

Zurück zum korrekten Laden. Dieses vollzieht sich dank 
des Geos-eigenen Turboladers innerhalb von zirka 30 
Sekunden. Auch nach dem Laden von Geos bleiben die 


Turbo-Routinen aktiv, das heißt, Sie nutzen im Geos- 
Betrieb (beim Laden und Speichern auf Diskette) immer die 
deutlich erhöhte Floppy-Geschwindigkeit aus. 

Die Bedienungselemente von Geos 


Im folgenden wollen wir anhand dieses Einschaltbildes 
(Bild 1) die Geos-Bedienungselemente vorstellen. Lassen 
Sie dazu die Diskette im Laufwerk, da noch darauf zuge¬ 
griffen wird. 

Halten Sie sich bitte exakt an die gegebenen Anweisun¬ 
gen. So ist gewährleistet, daß Ihre Diskette keinen Schaden 
nimmmt. 

Das elementarste Bedienungselement ist der blaue Pfeil 
(»Mauszeiger« oder »Mauscursor« genannt), den Sie stän¬ 
dig mit dem Joystick in Port 1 bewegen (probieren Sie es 
gleich aus, aber drücken Sie bitte nicht auf den Feuer¬ 
knopf!). Auch andere Eingabegeräte als der Joystick (zum 
Beispiel Maus, Lightpen, Koala Pad) sind möglich (siehe 
Geos-Handbuch, Abschnitte 1.1-1.5). 

Die Bedeutung des Mauszeigers liegt darin, daß Sie ihn 
immer auf das jeweilige Bedienungselement bewegen, 
welches Sie dann durch Betätigen des Feuerknopfes aus- 
lösen. 

Die grafischen Bedienungselemente von Geos sollen 
Sie nun kennenlernen. 

Icons (Kleingrafiken) 


Viele Funktionen werden unter Geos durch eine Grafik 
repräsentiert. Am Einschaltbildschirm sind gleich mehrere 
Icons (so der Fachausdruck für Kleingrafiken) zu finden: 
Diskettensymbol (rechts oben), Drucker und Papierkorb 
(rechts unten) sowie acht Icons in der eingerahmten Mitte 
des Bildschirms, auf die wir später noch zu sprechen kom¬ 
men. 

Als erstes wollen wir das Diskettensymbol »anklicken«. 
Bewegen Sie dazu den Mauszeiger auf das Diskettensym¬ 
bol und lösen Sie dann einmal kurz den Feuerknopf am Joy¬ 
stick aus. Das Diskettensymbol blinkt auf und es findet ein 
Zugriff auf die Diskette im Laufwerk statt, da dieses Icon 
eine Diskette initialisiert. Wenn Sie eine Diskette wechseln 
wollen, genügt es nämlich nicht, einfach die alte Diskette 
herauszunehmen und die neue einzulegen; zusätzlich ist 
noch das Disk-Symbol anzuklicken, wie wir es soeben 
getan haben. Legen Sie deshalb jetzt bitte eine andere Dis¬ 
kette (zum Beispiel C64-Demodiskette) in das Laufwerk 
und klicken Sie das Disketten-Icon an; an der Änderung 
des Bildschirmaufbaus und den hörbaren Floppyzugriffen 
erkennen Sie, daß Geos die neue Diskette akzeptiert hat. 

Programme starten 


Bislang haben wir uns im sogenannten »DeskTop« befun¬ 
den. Dies ist das Programm, das nach dem Laden von 
Geos als erstes im Speicher steht und ausgeführt wird. 
DeskTop dient nur zur Verwaltung von Dateien und Pro¬ 
grammen; diese werden von DeskTop aus aufgerufen. Der 
Aufruf vollzieht sich, indem am Bildschirm das Icon des 
gewünschten Programms angesteuert und »doppelge¬ 
klickt« wird (darunter versteht man das Drücken des Feu- 
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Bild 1. Einschaltbild nach dem Laden von Geos 



Bild 2. Umblättern mit dem Eselsohr 


erknopfs zweimal kurz hintereinander). Als Beispiel wollen 
wir das Geos-Ladeprogramm von Geos aus starten. Sein 
Icon steht links oben im eingerahmten Kasten; es trägt die 
Aufschrift»C= 64«. Bewegen Sie nun den Mauszeigerdar¬ 
auf und drücken Sie zweimal hintereinander auf »Feuer«. 
Sie sehen, wie Geos den Ladebefehl zur Ausführung gibt 
und sich wieder selbst lädt. Natürlich hätten wir uns diesen 
erneuten Ladevorgang sparen können, aber als Beispiel 
eignet er sich recht gut. 

Die Windowtedinik 


Das gerade angeklickte Icon »C= 64« befand sich zusam¬ 
men mit sieben weiteren Icons in einem eingerahmten Bild¬ 
schirmbereich. Solche Bildschirmbereiche bezeichnet 
man als Fenster (englisch »window«), Der Vorteil von Fen¬ 
stern liegt darin, daß sie nur einen Teilbereich des Bild¬ 
schirms beanspruchen und sich überlagern können. Wenn 
ein Fenster nicht mehr benötigt wird, stellt Geos den Bild¬ 
schirminhalt wieder her, der sich zuvor an der Window- 
Position befand. Dies werden wir bei der Erklärung der 
»Pull-down-Menüs« sehen. 

Das Directory-Fenster soll uns zunächst als Beispiel für 
die grundsätzlichen Elemente von Windows dienen. Ein 
Fenster ist grundsätzlich durch einen Kasten eingerahmt. 
Eine Besonderheit des Directoryfensters stellt hingegen 
das links unten stehende »Eselsohr« zum Seitenumblättern 
dar. Wenn Sie die linke Hälfte des Eselsohr anklicken (ein¬ 
mal klicken!), wird eine Seite nach vorne geblättert, das 
heißt, Sie sehen die Icons der nächsten Programme auf der 
aktuellen Diskette (Bild 2). 

Am wichtigsten erscheint jedoch das Schließsymbol 
rechts oben (das ausgefüllte Rechteck im Rahmen). 
Sobald dieses Symbol ausgelöst wird, schließt Geos das 
Fenster wieder. Dieses wird jetzt entweder neu aufgebaut 
oder es verschwindet vom Bildschirm, um Platz für neue 
Informationen zu machen. 

Pull-down-Menüs 


Eine ausgeprägte Menüsteuerung besitzen auch viele 
C64-Programme unabhängig von Geos. Insofern wird 
Ihnen das Prinzip von Menüs nicht unbekannt sein: Aus 
einer Vielzahl der zur Diskussion stehenden Funktionen, 
die durch einen kurzen Text (meist nur 1 Wort) beschrieben 
werden, wählt man am Bildschirm die gewünschte Option 
aus. 

Links oben am DeskTop-Bildschirm findet man eine Auf¬ 
stellung von Menüpunkten (»geos«, »file«, »view«, »disk«, 


»special«). Diese Menüpunkte wählt man durch Anklicken 
aus, also so, wie Sie es vom Disketten-Icon kennen. 

Lösen Sie deshalb jetzt den Feuerknopf aus, während 
sich der Mauszeiger über dem Menüpunkt »geos« befindet. 
Es rollt sich dann ein weiteres Menü auf; daher kommt die 
Bezeichnung »Pull-down-Menü« (Herunterzieh-Menü). 

Dieses Pull-down-Menü können Sie dadurch verlassen, 
indem Sie mit dem Mauszeiger aus seinem Bereich steu¬ 
ern; dann wird es unverzüglich vom Bildschirm entfernt. 

Um hingegen eine Funktion anzuwählen, müssen Sie 
diese nur anklicken. Als Beispiel eignet sich »Geos info« 
oder »DeskTop info«, woraufhin jeweils ein Fenster mit Infor¬ 
mationen über die Autoren von Geos und DeskTop 
erscheint. Durch Betätigen des Feuerknopfes verläßt man 
auch d ; ese Fenster. Dies nur ein kleiner Nachtrag zur Win- 
dowtecnnik. 

Viele Bedienungselemenfe 


Sie haben jetzt alle Geos-Bedienungselemente kennen¬ 
gelernt: Icons, Windows und Pull-down-Menüs. Zugegebe¬ 
nermaßen stellen diese eine Umstellung gegenüber dem 
normalen C64-Betrieb dar, aber daß sie eine hohe Bedie¬ 
nungsfreundlichkeit garantieren, haben Sie sicherlich 
bereits gemerkt. 

Da diese Bedienungselemente in allen Geos-Program- 
men wiederkehren, ist eine Umstellung auf neue Program¬ 
me einfach. Deshalb wollen wir uns an dieser Stelle nicht 
mit Details des DeskTop befassen, die Sie dem Handbuch 
oder dem Standardwerk »Alles über Geos« entnehmen 
können. Vielmehr wollen wir weitere Geos-Programme vor¬ 
stellen, damit ein besserer Einblick in die Leistungsfähig¬ 
keit der Geos-Software entsteht. 

Zuvor jedoch ein paar Anregungen, welche Menüpunkte 
zum Ausprobieren des DeskTop sehr empfehlenswert sind, 
weil man mit ihnen keinen Schaden anrichten kann: 

Das »view«-Menü liefert eine sortierte Anzeige der Dis¬ 
kettenfiles; diese können jedoch nur aus »view by icons« 
heraus gestartet werden, »open« im »disk«-Menü entspricht 
dem Disketten-Icon, »basic« in »special« führt zum Zurück¬ 
setzen (Reset) des C64 und »reset«, ebenfalls in »special«, 
initialisiert Geos, verläßt es jedoch nicht. 

Geos bietet Ihnen nicht nur die einzigartige Gelegenheit, 
den Umgang mit einer grafischen Benutzeroberfläche 
bereits auf dem C64 zu erproben und damit zukunftsträch¬ 
tiges Basiswissen zu erwerben, sondern hebt gleichzeitig 
den Wert aller Programme, die unter Geos ablaufen. Diese 
sind speziell an die grafische Oberfläche angepaßt, so daß 
Sie hier immer wieder auf die bereits erwähnten Windows 
stoßen werden. 
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Schon im Sonderheft 16 (Einsteiger) haben wir auf den 
Seiten 56ff. einige Geos-Programme vorgestellt. Die wich¬ 
tigsten Beispiele wollen wir Ihnen vorstellen. 

GeoPaint - das Malprogramm 


GeoPaint ist ein ausgezeichnetes Zeichenprogramm, das 
mit Geos ausgeliefert wird (es befindet sich auf der System¬ 
diskette). 

Seine vielen Bildbearbeitungsfunktionen sind nicht nur 
sehr bedienerfreundlich zu erreichen (Icons, Pull-down- 
Menüs), sondern auch außerordentlich schnell in der Aus¬ 
führung. 

Bei einer Auflösung von 320 *200 Punkten und 16 Farben 
sind Grafiken bis zu 640*720 Punkten Größe möglich. 

Bild 3 zeigt den Bildschirmaufbau von GeoPaint: In der 
Mitte befindet sich der jeweils sichtbare Grafikausschnitt, 
links oben die Menüleiste, am linken Rand die Werkzeug¬ 
leiste sowie die Musterlupe und rechts unten ein Status¬ 
fenster für die unterschiedlichsten Auswahlfunktionen. 

Eine besondere GeoPaint-Stärke ist die Einbindung von 
Texten in die Grafik (»T«-lcon in der Werkzeugleiste), wobei 
vielfältige Textgestaltungsmöglichkeiten offenstehen. Das 
Editieren im »Pixel-Modus« (Bildausschnitt wird vergrößert 
angezeigt) ist ein weiterer Glanzpunkt. 

Besonders wichtig ist jedoch die Möglichkeit, GeoPaint- 
Grafiken in Texte von GeoWrite zu übernehmen. 

Der Texteditor GeoWrite 


Fast so überzeugend wie GeoPaint ist GeoWrite, der Geos- 
Texteditor. Er beherrscht die notwendigsten Funktionen 
eines Texteditors; von einer »richtigen« Textverarbeitung 
kann man mangels einiger fehlender Möglichkeiten (bei¬ 
spielsweise Suchen/Ersetzen) noch nicht sprechen, doch 
der separat erhältliche »Writer’s Workshop« ist eine Weiter¬ 
entwicklung ohne Kompromisse. 

GeoWrite zeigt jedoch seine Stärken in der Qualität der 
damit entstanden Textausdrucke; es arbeitet mit Proportio¬ 
nalschrift, verschiedenen Zeichensätzen sowie Schriftar¬ 
ten (kombinierbar) und erlaubt die Übernahme von Grafi¬ 
ken aus GeoPaint in seine Texte. 

Auf Dauer ist das Programm allerdings etwas zu unkom¬ 
fortabel, da die Arbeitsgeschwindigkeit gegenüber einem 
»normalen« Textverarbeitungsprogramm doch sehr zu 
wünschen übrig läßt. 

Eine Auswahl der unzähligen Schriftarten und -Stile zeigt 
Bild 4. 



Bild 3. GeoPaint mit Texteinbindung 


Hilfsmittel (Desk Accessories) 


GeoWrite und GeoPaint sind sogenannte Applikationen, 
also unter Geos ablaufende Programme. Zusätzlich zu die¬ 
ser Programmsorte gibt es die Desk Accessories. Diese 
Programme sind aus jeder Applikation oder dem DeskTop 
heraus aufrufbar, ohne daß irgendwelche Daten verloren¬ 
gehen, denn nach der Ausführung eines Desk Accessories 
wird der alte Zustand wiederhergestellt. 

Desk Accessories stehen im »Geos«-Pull-down-Menü 
zur Verfügung. Ein gutes Beispiel ist der Taschenrechner. 

Dieser wird wie ein herkömmlicher Taschenrechner 
bedient (durch Anklicken der entsprechenden Tasten); mit 
dem Schließsymbol des Fensters wird er verlassen. 
Danach wird Ihr GeoWrite-Text oder Ihr GeoPaint-Bild wie¬ 
derhergestellt. 

Der Vorteil von Desk Accessories liegt klar auf der Hand: 
Sie können bei Bedarf gestartet werden, ohne daß dazu die 
aktuelle Applikation verlassen und danach neu gestartet 
werden muß. 

Weitere Desk Accessories dienen zum Einstellen einer 
Alarmzeit (alarm clock), zum Ändern der Voreinstellungen 
(preference manager) oder zum Festhalten von Notizen 
(note pad). 

Die Zukunft von Geos 


Außer der Geos-Software im Lieferumfang wurden zahlrei¬ 
che weitere Programme entwickelt. Im Sonderheft 16 
wurde darauf ausführlich eingegangen. 

Da noch mehr Veröffentlichungen geplant sind, steht 
Geos eine vielseitige und leistungsstarke Produktpalette 
bevor. 

Auch eine Umsetzung auf den C128 (siehe auch 64’er 
6/1987) sowie eine deutsche Version sollen nicht mehr 
lange auf sich warten lassen. 

Informationen über Geos 


Wo finden Sie weitere Informationen über GEOS. Der 
Geos-Artikel im 64’er-Sonderheft 16 wurde bereits wieder¬ 
holt angesprochen. Auch im 64’er-Stammheft nimmt Geos 
einen fest reservierten Raum ein; von Geos-Erfahrungs- 
berichten über Tips&Tricks bis zu einem eigenen Geos- 
Kurs findet man dort Monat für Monat die unterschiedlich¬ 
sten und aktuellsten Informationen. 

(Florian Müller/sk/pd) 



Bild 4. GeoWrite mit einigen seiner Schriftarten 
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Geschwindigkeit ist Trumpf... 


.. .wenn’s um Grafik geht. Wenn Sie dazu noch 
fünf Bildschirme verwalten und mit mehr als 40 
hochwertigen Befehlen und neuen Effekten 
arbeiten möchten, ist »Hires-Master« genau das 
richtige für Sie. Hires-Master zählt zu den 
schnellsten Grafikerweiterungen für den C64. 

D a das Basic V2 des C64 leider nicht über Befehle ver¬ 
fügt, mit denen die hochauflösende Grafik ohne 
POKEs programmiert werden kann, sind einige 
Basic-Erweiterungen erhältlich, die speziell auf Grafik 
zugeschnitten sind. 

»Hires-Master« ist eine Grafikerweiterung, die sich aber 
in vielen Beziehungen von anderen Erweiterungen unter¬ 
scheidet. Hier wurde konsequent Wert auf Geschwindigkeit 
gelegt. Das heißt, daß die meisten Befehle in bezug auf 
Schnelligkeit weit über dem Durchschnitt liegen. So setzt 
der LINE-Befehl zum Beispiel mehr als 13000 Punkte pro 
Sekunde! Auch Kreise oder ausgefüllte Rechtecke zeich¬ 
net das Programm in Windeseile. Hier nun die Leistungs¬ 
merkmale von »Hires-Master«: 

- Mehr als 30 Befehle für die hochauflösende Grafik 
- Sehr komfortabler FILL-Befehl 
- Befehle zum Zeichnen sind schneller als in anderen 
Erweiterungen 
- Befehle abkürzbar 

- Angabe von Einsprungadressen, dadurch Bedienung 
auch von Maschinensprache aus möglich 
- Bis zu fünf Grafikseiten 

Alle 43 Befehle von Hires-Master sind abkürzbar. Die Be¬ 
fehle lassen sich problemlos in bestehende Basic-Pro- 
gramme einbauen. 

Nach IF darf das THEN entfallen, so daß Befehle direkt 
hinter dem Vergleich stehen können. 

Hires-Master bietet dem Benutzer vier Grafikseiten, in 
denen gezeichnet werden kann. Eine fünfte kann zum Zwi¬ 
schenspeichern verwendet werden. Mit diesen Grafiksei¬ 
ten ist verdecktes Zeichnen problemlos möglich. Während 
in der ersten Grafik gezeichnet wird, sieht der Benutzer 
eine schon bestehende Grafik. Wenn das Bild fertig ist, wird 
einfach umgeblendet (sogar flackerfrei möglich). 

Zum Zeichnen stehen drei Modi zur Verfügung: Zeich¬ 
nen, Löschen und Invertieren. Eine Ausnahme bildet dabei 



Bild 1. Sie können so viele beliebige Muster darstellen, wie 
Sie möchten. Der Fill-Mustereditor hilft Ihnen dabei. 


der FILL-Befehl, der nur im Modus Zeichnen zu Verfügung 
steht. Mit ihm ist nur Zeichnen möglich. Das muß aber kein 
Nachteil sein, wenn man dafür eine nur selten in Grafiker¬ 
weiterungen verwirklichte Funktion zur Verfügung hat: Das 
Füllen mit Mustern. 

Weil eine Grafik ohne Beschriftung meistens nur eine 
halbe Sache ist, gibt es einen komfortablen TEXT-Befehl. 
Mit ihm ist es problemlos möglich, Texte an jede Stelle in die 
Grafik zu schreiben. Der Text kann sogar in Spiegelschrift 
erscheinen. 

Mit dem CIRCLE-Befehl werden die schnellsten und ge¬ 
nauesten Kreise gezeichnet, die auf dem C64 möglich 
sind. Kreise sind echte Kreise und keine Vielecke. Jeder 
Punkt hat den kleinstmöglichen Abstand zum Idealkreis 
(ähnlich der LINE-Routine, wo jeder Punkt den kleinsten 
Abstand zur Ideallinie hat). Ellipsen werden nicht so schnell 
gezeichnet wie Kreise, denn der Rechenalgorithmus ist 
aufwendiger. Das vermindert zwar die Geschwindigkeit, 
erhöht aber die Genauigkeit. 

Schnelle Kreise 


Zusätzlich gibt es noch den ARC-Befehl, der nach dem glei¬ 
chen Muster wie der Ellipsenbefehl arbeitet, mit dem Unter¬ 
schied, daß sich hier Kreis- oder Ellipsenausschnitte zeich¬ 
nen lassen. 

Es existiert noch ein FCIRCLE-Befehl, mit dem ausge- 
föllte K'aise in hoher Geschwindigkeit gezeichnet werden. 

Zur Veränderung von bestehenden Grafiken gibt es Be¬ 
fehle wie ROLL, SCROLL, DUPLICATE, XMIR und YMIR, 
um einen Grafikausschnitt zu verschieben, zu kopieren 
oder an der X- beziehungsweise Y-Achse zu spiegeln. 

Besitzer eines MPS 801-Druckers können sich freuen. 
Erstellte Grafiken lassen sich im Normalformat oder in dop¬ 
pelt großer Ausführung ausdrucken. 

Um das Umkopieren von zwei Grafikseiten interessant zu 
gestalten, gibt es den EFFEKT-Befehl mit 128 Möglichkei¬ 
ten zum Überblenden. Bildschirme können mit ECLS auf 
eine ansehnliche Art und Weise gelöscht werden. 

Will man zwei Grafikseiten oder Grafik und Text gemein¬ 
sam darstellen, kann man den WINDOW-Befehl benutzen. 
Es brauchen nur zwei Rasterzeilen, an denen umgeschal¬ 
tet wird, festgelegt werden. Alle Grafikseiten, auch die, die 
unter dem Betriebssystem liegt ($E000), können gespei- 


Gr-aus t u ■#=»«-* 



Bild 2. Der FILL-Befehl kann auch für Graustufen verwendet 
werden. Experimentieren wird hier empfohlen. 
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Bild 3. Ein mit dem ROLL-Befehl verschobener Bildschirm¬ 
ausschnitt in dreidimensionaler Darstellung 


Bild 4. Texte vielseitig auf den Bildschirm gebracht. So 
lassen sich Grafiken variantenreich beschriften. 


chert und geladen werden. Und das unabhängig davon, ob 
die Grafik ausgeschaltet ist, da sie weder beim Ein- noch 
beim Ausschalten gelöscht wird. Am Ende eines Pro¬ 
gramms oder bei dem Auftreten eines Fehlers wird die Gra¬ 
fik abgeschaltet. Außerdem sorgt eine eigene NMI-Routine 
dafür, daß selbst bei < RUN/STOP RESTORE > die Grafik 
ab $E000 nicht zerstört wird. Eine Grafik in diesem Bereich 
belegt keinen Basic-Speicherplatz. 

Befehlsbeschreibung: 

Zuvor noch ein paar Hinweise auf Abkürzungen, die bei 
der Erklärung der Befehle und deren Format benutzt wer¬ 
den: 

x: ist die X-Koordinate. Sie darf Werte von 0 bis 319 
annehmen. 

y: ist die Y-Koordinate. Sie kann zwischen 0 und 199 
liegen. 

Hier nun die Beschreibung aller in Hires-Master enthalte¬ 
nen Befehle. In der Klammer hinter dem Befehlswort steht 
die Abkürzung. Das Zeichen hinter dem Apostroph ist geS- 
HIFTet einzugeben (bei H’E drücken Sie zum Beispiel < H > 
<SHIFT E>). Die Zeichenbefehle wirken alle auf die 
aktuelle Grafik, die mit PAGE geändert werden kann. 

1. HELP (H’E) 

Listet alle verfügbaren Befehlswörter von Hires-Master. 

2. INIT(IN’I) 

Initialisiert die Erweiterung (setzt Vektoren, Farbe und 
löscht die Grafik). 

3. CLS (-) 

Löscht eine Grafik. Alle Bytes dieser Grafik werden auf 
Null gesetzt. 

4. COLOR pf.hf (CO’L) 

Setzt die Farben in der Grafik, mit »pf« als Punkt- und »hf« 
als Hintergrundfarbe, »pf« und »hf« dürfen entsprechend den 
16 Farben des C64 nur Werte von 0 bis 15 annehmen. 

5. GRON (G’R) 

Schaltet die $E000-Grafik ein. 

6. GROFF (GRO’F) 

Schaltet beliebige Grafik wieder aus und stellt den 
Zustand her, der vor dem Einschalten mit GRON zu sehen 
war. 

7. MODE m (M’O) 

Wechselt den Zeichenmodus. Man kann zwischen Lö¬ 
schen (m=0), Zeichnen (m=1) und Invertieren (m=2) 
wählen. 

8. PLOT x,y (P'L) 

Zeichnet einen Punkt in die Grafik an die Stelle x/y. 

9. LINE x1,y1,x2,y2 (LI’N) 

Zeichnet eine Linie in die aktuelle Grafik. Sollte der Son¬ 
derfall einer Horizontal- oder Vertikallinie eintreten, wird zu 
schnelleren Unterroutinen verzweigt. 


10. a:CIRCLE xm,ym,r (C’l) 
b:CIRCLE xm,ym,rx,ry (C’l) 

Zu a: Zeichnet einen Kreis mit xm/ym als Mittelpunkt und 
dem Radius r, der Werte zwischen 0 und 255 annehmen 
darf. 

Zu b: Zeichnet Ellipsen mit xm/ym als Mittelpunkt, »rx« 
und »ry« (0 bis 128) geben die Radien in X- und Y-Richtung 
an. 

11. BLOCK x1,y1,x2,y2 (B’L) 

Zeichnet ein ausgefülltes Rechteck mit xl/yl als linke 
obere Ecke und x2/y2 als rechte untere Ecke. 

12. BOX Xl,y1,x2,y2 (B’O) 

Zeichnet ein Rechteck mit xl/yl als linke obere Ecke und 
x2/y2 als rechte untere Ecke. 

13. FILL x,y (F’l) 

Füll' ".nen Bildschirmausschnitt beliebiger Größe und 
Form mit einem Muster. Der Punkt X/Y muß innerhalb der 
auszufüllenden Fläche liegen. 

14. SETMSK fm,m$ (S’E) 

Definiert ein Muster für den FILL-Befehl. Es können bis 
zu acht Muster intern gespeichert werden. Welches der 
acht Muster definiert werden soll, läßt sich mit »fm« auswäh¬ 
len. »fm« kann Werte zwischen 0 und 7 annehmen. Der 
FILL-Befehl benutzt ausschließlich Muster 0 zum Füllen 
(Bild 1 und 2). 

Ein Muster besteht aus 16 Zeilen mit jeweils 16 Punkten. 
Jede Zeile wird durch vier Hexadezimalzahlen dargestellt. 
Das heißt: Eine Hex-Zahl legt die Formation von vier Punk¬ 
ten fest. Eine Hex-Zahl entspricht vier Bit oder einer 
4stelligen Dualzahl: 


Hex-Zahl 

Dezimal 

Binär 

Hex 

Dex 

Bin 

0 

0 

0000 

8 

8 

- 1000 

1 

1 

0001 

9 

9 

- 1001 

2 

2 

0010 

A 

10 

- 1010 

3 

3 

0011 

B 

11 

- 1011 

4 

4 

0100 

C 

12 

- 1100 

5 

5 

0101 

D 

13 

- 1101 

6 

6 

0110 

E 

14 

- 1110 

7 

7 

0111 

F 

15 

- 1111 


Links steht die Hex-Zahl, in der Mitte die Dezimalzahl und 
rechts das Bit-Muster (Binärzahl). Jede »1« entspricht einem 
gesetzten, jede »0« einem nicht gesetzten Punkt. 

Für das nachfolgende Muster (nächsten Seite, oben 
links) sind alle Hex-Zahlen mit aufgeführt, darunter findet 
man ein Beispiel des Befehls: 
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1 . 

2. 

3. 

4 

0000 

0000 

0000 

0000 

0 

0 

0 

0 

0000 

0011 

1100 

0000 

0 

3 

c 

0 

0000 

1111 

1100 

0000 

0 

F 

c 

0 

0001 

1111 

1100 

0000 

1 

F 

c 

0 

0011 

1100 

0011 

1111 

3 

c 

3 

F 

0011 

1000 

0011 

1110 

3 

8 

3 

E 

0111 

0000 

0011 

1100 

7 

0 

3 

C 

0111 

0000 

0000 

0000 

7 

0 

0 

0 

0111 

0000 

0000 

0000 

7 

0 

0 

0 

0111 0000 

0011 

1100 

7 

0 

3 

C 

0011 

1000 

0011 

1110 

3 

8 

3 

E 

0011 

1100 

0011 

1111 

3 

c 

3 

F 

0001 

1111 

1100 

0000 

1 

F 

C 

0 

0000 

1111 

1100 

0000 

0 

F 

C 

0 

0000 

0011 

1100 

0000 

0 

3 

C 

0 

0000 

0000 

0000 

0000 

0 

0 

0 

0 


SETMSK 0,"000003COOFC01FC03C3F383E703C7000 
7000703C383E3C3F1FC00FC003C00000" 

Der String hat also eine Länge von 64 Zeichen (pro Zeile 
vier Hex-Zahlen macht bei 16 Zeilen 4 x 16 = 64 Zeichen). 
Sehen Sie sich das Muster doch mal an: 

GRON:CLS:CIRCLE160,100,50:FILL160,100:WAIT198,1 
Der WAIT-Befehl wartet auf eine Taste. 

15. CHAMSK ma1,ma2 (CH’A) 

Vertauscht die intern gespeicherten Masken miteinan¬ 
der. »mal« und »ma2« dürfen Werte zwischen 0 und 7 
annehmen. 

16. STOMSK ma1,ma2 (STO’M) 

Kopiert die Maske mit Nummer »mal« über die Maske 
Nummer »ma2«. 

17. ROLL r,x1,y1,x2,y2 (R’O) 

Rollt einen Grafikausschnitt um einen Punkt, »xl/yl« 
kennzeichnen die linke obere und »x2/y2« die rechte untere 
Ecke. Der Parameter »r« bestimmt die Richtung: 
r=0 - rechts 
r= 1 - links 
r=2 - oben 
r=3 - unten 

Rollen bedeutet, daß keine Punkte beim Verschieben verlo¬ 
rengehen. Alle aus dem Bildschirm hinausgeschobenen 
Punkte werden auf der gegenüberliegenden Seite wieder 
hineingeschoben (Bild 3). 

18. SCROLL r,x1,y1,x2,y2 (S’C) 

Die Parameter des SCROLL-Befehls entsprechen denen 
des ROLL-Befehls. Im Unterschied zum ROLL-Befehl 
gehen alle hinausgeschobenen Punkte verloren. 



Bild 5. Text kann in alle Richtungen gedreht werden 



Bild 6. DUPLICATE kopiert Bildschirmausschnitte in jeder 
Größe und an jede beliebige Position 


19. TEXT x,y,t$ (T'E) 

DerText, der in »t$« steht, wird an Position x/y in die Grafik 
geschrieben. Im String dürfen folgende Cursor-Steuerzei¬ 
chen Vorkommen: 

CLR, HOME, CRSR+UP/DOWN/LEFT/RIGHT, RETURN, 
CTRL+N (CHR$(14) Kleinschrift), CHR$(142) (Großschrift), 
RVS ON und RVS OFF. 

20. SIZE vx,vy,ax,ay(,d) (SI’Z) 

Der Befehl SIZE gibt die Vergrößerung der mit TEXT aus¬ 
zugebenden Zeichen an: »vx« steht für die X-Richtung und 
»vy« für die Y-Richtung. »ax« und »ay« definieren den 
Abstand zum nächsten Zeichen. Werden den Variablen ax 
beziehungsweise ay negative Werte zugewiesen, läßt sich 
der Text entsprechend in alle vier Richtungen ausgeben, 
»d« (von 0 bis 3) gibt die Anzahl der 90-Grad-Drehungen 
eines Zeichens an. Es wird gegen den Uhrzeigersinn 
gedreht. (Es versteht sich von selbst, daß SIZE vor dem 
TEXT-Befehl im Programm stehen muß, damit die Parame¬ 
ter richtig wirken) (Bild 4 und 5). 

21. ARC xm,ym,rx,ry,sw,ew (A’R) 

Mit diesem Befehl können auf einfache Art und Weise 
Ellipsenausschnitte gezeichnet werden, »xm/ym« geben 
wieder die Koordinaten des Mittelpunktes an und »rx/ry« die 
Radien in X- beziehungsweise Y-Richtung. »sw« ist der 
Startwinkel und »ew«der Endwinkel. Null Grad liegt, wie bei 
einer Uhr, senkrecht über dem Mittelpunkt. Es wird im Uhr¬ 
zeigersinn gezeichnet. Wollen Sie zum Beispiel einen 
270-Grad-Ausschnitt aus einer Ellipse zeichnen, so muß 
der Endwinkel um 270 Grad größer sein als der Startwinkel. 
Beispiel: Eine Ellipse im Mittelpunkt der Grafik: 

GRON:CLS:M0DE1:ARC160,100,90,30,45,315:WAIT198,1 

22. RAD xm,ym,rx,ry,w (R’A) 

Dieser Befehl zeichnet einen Radius in eine imaginäre 
Ellipse, »xm/ym/rx/ry« wie oben, »w« gibt den Winkel (0° bis 
360°) an, unter dem der Radius gezeichnet wird. 

23. FCIRCLE xm,ym,r(F’C) 

FCIRCLE zeichnet gefüllte Kreise, »xm/ym« definieren 
wieder den Mittelpunkt, »r« stellt den Radius dar, den der 
ausgefüllte Kreis haben soll. Es sind Werte zwischen 0 und 
255 erlaubt. 

24. ECLS verz (E’C) 

ECLS löscht die Grafik, »verz« (0 bis 255) gibt die Ge¬ 
schwindigkeit des Löschens an. Der Grafikschirm wird 
effektvoll gelöscht. Lassen Sie sich überraschen! 

25. REVERS (RE’V) 

Invertiert eine Grafik. Gesetzte Punkte werden zu 
gelöschten und umgekehrt. 

26. FIGURE x,y,f$ (FI’G) 

In »f$« sind die relativen Koordinaten einer Figur gespei¬ 
chert. Den Zahlen von 1 bis 8 im String kommt die beson- 
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Bild 7. Durch Duplizieren und Verschieben von Bildberei¬ 
chen lassen sich recht reizvolle Effekte erzielen 


dere Bedeutung der Koordinatenspeicherung zu: Eine »1« 
bedeutet < Schritt nach oben>, »2« < Schritt nach 
rechts >. Eine »3« bedeutet < Schritt nach unten > und 
eine »4« < Schritt nach links >. Bei den nachfolgenden 
Zahlen wird erst ein Punkt gesetzt (im Sinne des Zeichen¬ 
modus) und dann ein Schritt in die Richtung gemacht, die 
die Zahlen angeben. Eine »5« bedeutet <Plotten und 
Schritt nach oben >, »6«, »7« und »8« jeweils < Plotten und 
Schritt nach rechts, unten oder links >. Soll zum Beispiel 
ein Quadrat gezeichnet werden, so muß »f$« so definiert 
werden: 
f$="5678" 

Der Befehl lautet dann: 

FIGURE 160,100,"5678" 

oder 

FIGURE 160,100,f$ 

Aber was sieht man in der Grafik? Einen dicken Punkt. 
Das Quadrat hat die Ausdehnung 2 an jeder Seite. Man 
könnte jetzt jede Zahl in f$ vervielfachen, aber es gibt noch 
einen anderen Weg: Den Befehl TURN. 

27. TURN v,d (T’U) 

Mit TURN kann die mit FIGURE zu zeichnende Figur ver¬ 
größert und gedreht werden, »v« entspricht dem Vergröße¬ 
rungsfaktor und kann Werte zwischen 0 und 255 anneh¬ 
men. »d« (0 bis 7) gibt die Anzahl der 45-Grad-Drehungen 
an. Der Wert 3 dreht die Figur um 135 Grad (3*45=135). Da 
TURN den Befehl FIGURE beeinflußt, muß TURN vor 
FIGURE stehen, damit er wirken kann. 

28. XMIR x1,y1,x2,y2 (X’M) 

Mit dem Befehl XMIR wird der Grafikausschnitt, den 
xl/yl und x2/y2 eingrenzen, an der X-Achse gespiegelt (auf 
den Kopf gestellt). 

29. YMIR x1,y1,x2,y2 (Y’M) 

Der Befehl ist gleichbedeutend mit XMIR, mit dem Unter¬ 
schied, daß der Grafikausschnitt an der Y-Achse gespiegelt 
wird (seitenverkehrt). 

30. PAGE p1,p2 (PA) 

Mit dem Befehl PAGE wird festgelegt, in welcher Grafik 
gezeichnet wird und weiche sichtbar ist. »pl« stellt die Gra¬ 
fik ein, in der gezeichnet wird, »p2« die, welche sichtbar ist. 
»pl« und »p2« können Werte von 0 bis 7 annehmen. Aber 
nicht jeder Wert entspricht einem anderen Grafikspeicher. 
Die Werte »0«, »5«, »6« und »7« beschreiben alle den Grafik¬ 
speicher ab $E000. Hier eine Tabelle über die PAGE-Werte 
mit den dadurch eingeschalteten Grafik- und Farbspei- 
chern: 

Voreingestellt (nach dem ersten Start) ist PAGE 7,7. Die 
Grafikseite 4 kann nicht angezeigt werden, da dort der Zei¬ 
chensatz eingeblendet ist. Diese Grafik wird beim FILL- 
Befehl zum Zwischenspeichern benutzt. 


Wert 

Hex 

Grafikadresse 

Dez 

Hex 

Farbadresse 

Dez 

0 

$E000 

57344 

$DC00 

56320 

1 

$2000 

8192 

$0800 

2048 

2 

$4000 

16384 

$6000 

24576 

3 

$6000 

24576 

$5C00 

23552 

W 

$8000 

32768 

$8000 

32768 

5 

$E000 

57344 

$DC00 

56320 

6 

$E000 

57344 

$DC00 

56320 

7 

$E000 

57344 

$DCO0 

56320 


31. DUPLICATE Xl,y1,x2,y2,x,y(,p1,p2) (D’U) 

DUPLICATE kopiert Bildschirmausschnitte. Dabei 

geben xl/yl und x2/y2 (links oben und rechts unten) die 
Eckpunkte eines rechteckigen Ausschnitts an, der so 
kopiert wird, daß x/y die neue linke obere Ecke angeben, 
»pl« und »p2« sind PAGE-Parameter. Sie sind optional 
anzuwenden. Hiermit ist es möglich, einen Grafikaus¬ 
schnitt von einer Grafikseite in eine andere zu kopieren. Es 
wird von pl nach p2 kopiert, wobei pl und p2 die Nummern 
der beim PAGE-Befehl aufgeführten Grafikspeicher dar¬ 
stellen (Bild 6 und 7). 

32. CONNECT p1,p2,mo (CON’N) 

CONNECT verknüpft einzelne Grafikseiten miteinander. 
Es wird pl mit p2 verknüpft und das Ergebnis nach p2 
geschrieben, »mo« gibt die Art der Verknüpfung an: 
mo = 0 - Kopieren 
mo = 1 - OR-Verknüpfung 
mo = 2 - AND-Verknüpfung 
mo = 3 - EXOR-Verknüpfung 
Dabei bedeutet OR, daß das neue Bild alle gesetzten 
Punkte beider Grafikseiten enthält. Bei AND werden nur die 
Punkte übernommen, die auf beiden Seiten gesetzt sind. 
Etwas komplizierter ist die EXOR-Verknüpfung. Ist auf 
einer der Grafikseiten ein Punkt gesetzt, wird er im neuen 
Bild gelöscht, andernfalls wird er gesetzt. 

33. SWAP p1,p2,mo (S’W) 

Mit dem SWAP-Befehl werden zwei Grafikseiten mitein¬ 
ander verknüpft und gleichzeitig vertauscht, »pl« wird mit 
»p2« verknüpft, dann p2 nach pl kopiert und danach das 
Ergebnis der Verknüpfung nach p2 geschrieben, »mo« hat 
die gleiche Bedeutung wie bei CONNECT. 

34. EFFECT p1,p2,a,verz (E’F) 

Mit EFFECT werden zwei Grafikseiten miteinander ver¬ 
tauscht. »a« gibt die Art der Vertauschung an. Es sind Werte 
von 0 bis 255 erlaubt, wobei bei den geraden Zahlen das 
gleiche Ergebnis wie bei den nächst höheren ungeraden 
Zahlen zu erwarten ist. »verz« gibt die Wartezeit an, nach¬ 
dem ein Byte kopiert wurde (0 bis 255). 



Bild 8. Geschwindigkeitsvergleich: Zeichnen einer Linie. 
Hires-Master liegt eindeutig vorn. Angaben in Sekunden. 


(33a? 
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35. GSAVE p,fi$,ga (G’S) 

Die Grafik mit der Nummer »p« wird unter dem Namen 
»fi$« auf dem Gerät mit der Geräteadresse »ga« gespei¬ 
chert. Die Bildschirmfarbe wird dabei der Rahmenfarbe 
gleichgesetzt. 

36. GLOAD p,fi$,ga (G’L) 

Die Grafik mit Namen »fi$« wird vom Gerät mit Geräte¬ 
adresse »ga« in den Grafikspeicher »p« geladen. 

37. WINDOW r1,r2,p1,p2 (W’l) 

Mit dem WINDOW-Befehl läßt sich der Bildschirm in zwei 
Bereiche aufteilen: Von Zeile »rl« bis Zeile »r2« wird die 
Grafik »pl« dargestellt und von Zeile »r2« bis zum unteren 
Rand Grafik »p2«. Will man statt zwei Grafiken Text und Gra¬ 
fik darstellen, muß statt der Grafiknummer ein Wert von 128 
eingesetzt werden. WINDOW speichert beim Aufruf die 
aktuellen VIC-Werte und setzt sie dann, wenn der TEXT- 
Modus angewählt ist, also ein Wert von 128 im WINDOW- 
Befehl steht. 

Deshalb ist es ratsam, den Befehl bei ausgeschalteter 
Grafik zu aktivieren. Gibt man nur WINDOW ein, wird der 
Zustand vor dem Einschalten wieder hergestellt. 

38. COPY p(,1) (CO’P) 

Mit diesem Befehl wird eine Hardcopy im MPS 801-For- 
mat an den Drucker gesandt. Der Seikosha GP 100 VC und 
Epson-Drucker mit zum Beispiel Wiesemann- oder Data- 
Becker-Interface drucken ebenfalls diese Hardcopies, »p« 
gibt auch hier die Grafikseite an, die gedruckt werden soll. 
Zum Ausgeben einer invertierten Grafik muß ein Wert von 
128 zum Page-Wert addiert werden. Soll die Hardcopy über 
eine volle Seite gehen, so wird noch »,1« an den Page-Wert 
angehängt. 

Testfunktionen 


or 

39. CSET x,y,pf(,hf) (C’S) 

Mit CSET werden gezielt Farben gesetzt, »pf« gibt die 
Punktfarbe und »hf« die Hintergrundfarbe an. »hf« kann 
alternativ verwendet werden. 

40. OPTION ON/OFF (OP’T) 

Nach dem Start von Hires-Master befindet man sich im 
OPTION ON-Modus. 

Alle Hires-Master-Befehle werden beim LISTen invertiert 
dargestellt. Abschalten kann man das durch OPTION OFF. 

41. OFF (O'F) 

Schaltet Hires-Master aus und initialisiert alle Vektoren 
wie bei <RUN/STOP RESTORE>. 

42. TEST (x,y) (TE’S) 

Der Funktionswert wird »1«, wenn ein Punkt an der Stelle 
x/y gesetzt war, ansonsten »0«. 



Bild 9. Zeichnen eines Punktes. Hier ist kaum eine höhere 
Geschwindigkeit zu erreichen. 





BOX 0,8.319,199 


Bild 10. Geschwindigkeitsvergleich: Ein Rahmen wird 
gezeichnet. Mehr als 15mal schneller: Hires-Master 


43. CTEST (x,y,pp) (C’T) 

Hiermit wird die aktuelle Farbe an der Stelle x/y getestet. 
Ob Vorder- oder Hintergrundfarbe wird mit »pp« ent¬ 
schieden: 

pp=0 testet die Punktfarbe 
pp= 1 testet die Hintergrundfarbe. 

Das Testergebnis ist immer der Farbcode (eine Zahl zwi¬ 
schen 0 und 15). 

Eines der Hauptmerkmale dieser Erweiterung sind die 
extrem kurzen Ausführungszeiten der einzelnen Zeichen¬ 
befehle. Wenn hier nur Zeichenbefehle aufgeführt sind, so 
liegt das daran, daß nur diese entsprechend optimiert wur¬ 
den,.denn ein Geschwindigkeitsvorteil ergibt sich meistens 
nur du.jh Einbuße von Speicherplätzen. Dadurch würde 
das Programm einfach zu lang. 

Vergleiche mit anderen Erweiterungen 


Kommen wir zu den eigentlichen Zeiten: Verglichen wur¬ 
den fünf Basic-Erweiterungen (HSG-W, Grafik 2000, S+G- 
Basic, G-Basic (von HES) und Simons-Basic). Zur Doku¬ 
mentation dienen die Bilder 8 bis 13. Es wurden die Zeiten 
von sieben Befehlen getestet (alle Zeiten sind Sekunden¬ 
angaben). 

Ihnen ist sicherlich aufgefallen, daß Hires-Master bei 
dem Befehl TEXT zurückliegt. In der G-Basic-Erweiterung 
von HES-Software gibt es zwar einen TEXT-Befehl, der 
schneller ist als der von Hires-Master, aber dieser leistet 
nicht soviel: 

So kann er zum Beispiel nur waagerecht in einer Rich¬ 
tung schreiben, keine Buchstaben drehen, und als wichtig¬ 
sten Punkt: Er hat nur 40 Spalten und 25 Zeilen zum Positio¬ 
nieren des Textes. Soviel zu den Befehlen, deren Ausfüh¬ 
rungszeiten und Leistungen. 

Einsprungadressen 

Für alle, die schon etwas von Maschinensprache verste¬ 
hen, folgt eine Tabelle über die Routine, die der Interpreter 
anspringt, um einen Befehl oder eine Funktion auszufüh¬ 
ren. 

Alle Aufrufe werden mit ausgeschaltetem Interrupt (SEI), 
ausgeschalteten ROMs und I/O ausgeführt. 

Also: 

SEI 

LDA #$30 
STA $01 

JSR $XXXX ;BEFEHLS- oder FUNKTIONSADRESSE 
LDA #$37 
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STA $01 

CLI 

RTS 

Vor der erstmaligen Benutzung muß das Programm ini¬ 
tialisiert werden. Dazu springt man so wie oben beschrie¬ 
ben nach $A001. Wichtig in diesem Teil ist das Aufstellen 
einer Tabelle, welche die Adressen jeder Grafikzeile ent¬ 
hält. Hier nun die einzelnen Befehls- und Funktionsnamen 
und deren Adressen im RAM. 

Spezialroutinen, die von anderen Routinen aufgerufen 
werden, sind durch ein Sternchen (*) gekennzeichnet. 


Adresse 

Funktion 

Adresse 

Funktion 

SA001 

- Initialisieren < • > 

SB3FF 

- SCROLL 

SA08D 

- CLS 

SB678 

- DUPLICATE 

$A0F5 

- COLOFI 

SB881 

- RAD 

SA124 

- GR0N 

SB9A6 

- REVERS 

SA152 

- GR0FF 

SB9C0 

- GSAVE 

SA173 

- PLOT 

SBA27 

- GL0AD 

$A1BD 

- LINE 

$BA40 

- C0NNECT 

SA3DC 

- HLINE <-LINE> 

$BA9D 

- SWAP 

SA4A6 

- VLINE <-LINE> 

$BB00 

- FIGURE 

$A504 

- CIRCLE 

$BB72 

- TURN 

SA613 

- BLOCK 

$BB94 

- PAGE 

$A71D 

- BOX 

SBC 15 

- EFFECT 

SA741 

- ELLIPSE <-CIRCLE > 

SBCA8 

- WINDOW 

SA814 

- FILL 

SBD93 

- XMIR 

SAA79 

- SETMSK 

$BE84 

- YMIR 

SAAB2 

- CHAMSK 

, SBF24 

- OPTION 

SAAD9 

- ST0MSK 

SBF37 

- FUNK. TEST 

SAAF8 

- ROLL 

SC000 

- INIT (Befehl) < > 

SAAE9 

- TEXT 

SC20F 

- Neuer IRQ 

$B012 

- SIZE 

SC253 

- C0PY 

$B061 

- HELP 

$C41B 

- CSET 

$8087 

- ECLS 

SC47F 

- FUNK. CTEST 

$B109 

- ARC 

SC4A3 

- Subroutinen < • > 

SB318 

- FCIRCLE 

$C797 

- Tabellen (bis $CB14) 



Bild 11. Geschwindigkeitsvergleich: Füllen mit einem 
Muster. Auch hier eine extrem überdurchschnittliche 
Leistung. 



Die Adressenangaben beziehen sich auf den Anfang der 
Befehle. Es müssen also noch Parameter geholt werden. 
Dazu wird in den Programmteil »Subroutinen« verzweigt, 
um die entsprechenden Parameter zu holen. Die Adresse 
$A001 wird vom INIT-Befehl aus angesprungen. 

Hier werden alle nötigen Vektoren und Speicherzellen 
gesetzt. HLINE ab $A3DC zeichnet horizontale, VLINE ab 
$A4A6 vertikale Linien. Es wird erwartet, daß sich die Koor¬ 
dinaten in den entsprechenden Speicherzellen befinden. 

Bei den meisten Befehlen ist mindestens die Angabe des 
Koordinatenpaares x/y erforderlich (PLOT, LINE, CIRCLE 
etc.), beim LINE-Befehl sogar zwei Paare. Die Speicherzel¬ 


Bild 12. Zeichnen eines Kreises. Hires-Master ist etwa 
30mal schneller als die meisten Konkurrenten. 


len für diese Koordinaten: (Die X-Koordinate braucht immer 
zwei Speicherzellen, da bei ihr Werte von 0 bis 319 erlaubt 
sind) 

1. Koordinatenpaar (x/y oder xl/yl): 

X-Koordinate:$AC/AD 

Y-Koordinate:$AE 

2. Koordinatenpaar (x2/y2): 

X-Koordinate:$Cl/C2 

Y-Koordinate:$02 

Soll zum Beispiel ein Kreis mit dem Radius 66 in die Mitte 
der Grafik gesetzt werden, so sieht man sich den Pro¬ 
grammteil ab $A504 an und sucht die Stelle, ab der alle 
Parameter vom Basic-Interpreter geholt werden (diese 
Stelle muß übersprungen werden, da man ja von Maschi¬ 
nensprache aus einen Kreis zeichnen möchte). Der 
besagte Einsprung liegt bei $A519. Der Radius muß sich vor 
dem Aufruf im X-Register befinden, die Koordinaten des 
Mittelpunktes in $AC/$AD (X-Koordinate) und $AE (Y- 
Koordinate). 

Das Programm (es liegt im Kassettenpuffer!) würde nun 
so lauten: 

0330 SEI ;INTERRUPT AUS 

033D LDA #$30 ;SPEICHER KOMPLETT AUF RAM 


;TABELLE INITIALISIEREN 
;160 LOW-BYTE DER X-KOORDINATE 
;0 HIGH-BYTE DER X-KOORDINATE 
;100 Y-K00RDINATE 
;KOORDINATEN SPEICHERN 


;66 (RADIUS) 

;EINSPRUNG ZUR KREISROUTINE 
;ALTE RAM-ROM-KONFIGURATION 

;INTERRUPT WIEDER EIN 


#$30 

033F STA $01 
0341 JSR $A001 
0344 LDA #$A0 
0346 LDY #$00 
0348 LDX #$64 
034A STA $AC 
0340 STY $AD 
034E STX $AE 
0350 LDX #$42 
0352 JSR $A519 
0355 LDA #$37 
0357 STA $01 
0359 CLI 
035A RTS 

ACHTUNG! Bei den meisten Befehlen werden die Koor¬ 
dinaten in ($AC/$AD,$AE) verändert, deshalb sollte man 
sie, falls sie weiter benötigt werden, vorher speichern. 

Der Fill-Mustereditor 


Der recht komfortable Editor zum Erstellen von neuen Füll¬ 
mustern wird mit RUN gestartet. Nun baut sich die Arbeits¬ 
fläche auf. Das mit Punkten gefüllte Rechteck entspricht 
dem späteren Füllmuster. Mit den Cursor-Tasten kann 
beliebig darin herumgefahren werden. Mit der Leer-Taste 
wird der Punkt, an dem sich der Cursor momentan befin- 
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Bild 13. Schreiben eines Textes. Hier ist Hires-Master 
wegen seiner komplizierten Berechnungen an zweiter 
Stelle. 


det, invertiert, das heißt, ist er gelöscht, so wird er gesetzt 
und umgekehrt. 

Um ein möglichst großes Arbeitstempo zu gewährlei¬ 
sten, wurde auf allzu große Übersichtlichkeit des Pro¬ 
gramms verzichtet. 

Man muß nun erst einmal <B> drücken, um in den 
»Befehls-Eingabe«-Modus zu gelangen. Jetzt kann man 
durch Betätigen der entsprechenden Taste einen von 17 
Befehlen aussuchen: 

- <0> rechnet das Arbeitsfeld in Hexadezimalzahlen 
um - entsprechend den Anforderungen der Grafikerweite¬ 
rungen. Diese können mit dem Befehl »Setmsk« in die Füll¬ 
maske umgesetzt werden. 

- <E> beendet das Programm. Hierzu ist außer dem 
Hinweis, daß das Muster dann verloren ist, nichts mehr zu 
sagen. 


- <, > veranlaßt den Cursor an den Anfang der Zeile zu 
springen. 

- <. > Cursor springt an das Ende der Zeile. 

- <X> hält die momentane X-Position des Cursors fest. 
Sie wird über dem Arbeitsfeld mit einem Strich gekenn¬ 
zeichnet. 

- <A> läßt den Cursor in die vorher mit <X> gekenn¬ 
zeichnete Spalte springen. 

- <Y> arbeitet analog zu dem <X>-Befehl, allerdings 
merkt sich der Computer nun die Y-Position. 

- < B> bringt den Cursor in die entsprechende Zeile. 

- <Z> löscht die gesamte Zeile, in der sich der Cursor 
gerade aufhält. 

- <S> löscht die momentane Spalte. 

- <SHIFT Z> setzt die ganze Zeile, ebenso wie 

- <SHIFT S> die ganze Spalte füllt. 

- <CBM Z> invertiert die Zeile. 

- <CBM S> invertiert die Spalte. 

- < Home > läßt den Cursor in die linke obere Ecke sprin¬ 
gen, während 

- < CLR > noch den Bildschirm löscht, bevor der Cursor 
nach links oben springt. 

- < I > invertiert das gesamte Arbeitsfeld. 

Der Fill-Mustereditor ist wesentlich komfortabler in der 
Handhabung als der eingebaute SETMSK-Befehl. 

Eingabehinweise 

Geben Sie bitte die Grafikerweiterung »Hires-Master« 
(Listing 1) mit dem MSE ein und speichern diese. Der Start 
erfolgt mit RUN. Das Listing 2 ist für die Funktion nicht 
erforderlich, es dient nur als Beispiel für die Leistungsfähig¬ 
keit von Hires-Master. Listing 3, den Fill-Mustereditor, 
geben Sie bitte mit dem Checksummer ein. Es benötigt 
zum Betrieb den Hires-Master. 

uns»»* 

(J. Schwarzer/S. Thelen/og) 


Name • 

: hires- 

-master 


0801 3418 

0801 ; 

4d 

08 

c2 

07 

9e 

28 

32 

31 

3a 

0809 : 

34 

34 

29 

20 

0e 

05 

22 

c8 

c9 

0811 : 

49 

52 

45 

53 

2d 

cd 

41 

53 

2c 

0819 : 

54 

45 

52 

20 

49 

53 

20 

57 

07 

0821 : 

52 

49 

54 

54 

45 

4e 

20 

20 

3f 

0829 ; 

20 

20 

20 

20 

20 

20 

20 

20 

29 

0831 : 

20 

20 

20 

20 

20 

20 

20 

20 

31 

0839 : 

20 

42 

59 

20 

ca 

45 

53 

4b 

8f 

0841 : 

4f 

20 

d3 

43 

48 

57 

41 

52 

e7 

0849 : 

5a 

45 

52 

00 

00 

00 

44 

30 

4c 

0851 : 

00 

00 

00 

00 

00 

00 

00 

00 

52 


0859 : 

00 

00 

00 

00 

00 

00 

00 

a9 

ad 

0863 : 

: 00 

aO 

aO 

a2 

09 

85 

f 7 

85 

d5 

0869 : 

f 9 

84 

fa 

86 

f 8 

a2 

2c 

a8 

da 

0871 : 

: bl 

f 7 

91 

f 9 

c8 

dO 

f 9 

e6 

8a 

0879 : 

f 8 

e6 

fa 

ca 

dO 

f 2 

4c 

00 

d2 

0881 ; 

: C0 

cO 

00 

00 

00 

00 

00 

00 

a2 

0889 : 

00 

00 

00 

00 

00 

00 

00 

d6 

37 

0891 : 

45 

52 

53 

49 

4f 

4e 

20 

32 

4a 

0899 : 

00 

30 

20 

4b 

4f 

4d 

4d 

54 

60 

08al : 

: 20 

42 

41 

4c 

44 

2« 

20 

d6 

aO 

08a9 : 

49 

45 

4c 

4c 

45 

49 

43 

48 

6e 

08bl : 

: 54 

20 

4d 

49 

54 

20 

d2 

4f 

c2 

08b9 : 

: 54 

41 

54 

45 

20 

55 

4e 

44 

da 


08cl : 20 cd 41 47 4e 49 46 59 fc 
08c9 : 2e 00 00 00 00 00 00 00 f8 
08dl : 00 00 00 00 00 00 00 00 d2 
08d9 : 00 00 00 00 00 00 00 00 da 
08ol : 00 00 00 00 00 00 00 00 e2 
08e9 : 00 00 00 00 00 00 00 00 ea 
08f3 : 00 00 00 00 00 00 00 00 f2 
08f9 : 00 00 00 00 00 00 00 00 fa 
0901 : a9 ed aO cl 8d 00 03 8c ff 
0909 : 01 03 a9 fe aO cl 8d 02 28 

Listing 1. »Hires-Master« - bitte 
mit dem MSE eingeben 
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0911 

03 

8c 

03 

03 

a9 

la 

aO 

cO 

eb 

0 c 21 

49 

00 

11 

f 7 

91 

f 7 

a5 

bf 

9c 

Of 31 : 

fa 

ab 

cl 

29 

07 

aa 

bd 

e9 

24 

0919 

8d 

04 

03 

8c 

05 

03 

a9 

56 

b6 

0c29 

49 

00 

01 

f 9 

81 

f 9 

c6 

fd 

fl 

Of39 : 

c7 

85 

af 

20 

9a 

c6 

aO 

10 

15 

0921 

aO 

Cl 

8d 

06 

03 

8c 

07 

03 

7d 

0c31 

dO 

be 

60 

46 

be 

90 

Oa 

66 

a7 

Of 41 : 

a5 

f 7 

cb 

f 9 

dO 

lf 

ab 

f 8 

21 

0929 

a9 

d2 

aO 

cO 

8d 

08 

03 

8c 

ba 

0c39 

be 

98 

69 

08 

a8 

90 

02 

e6 

84 

Of49 : 

e5 

fa 

dO 

19 

bd 

el 

c7 

25 

57 

0931 

09 

03 

a9 

26 

aO 

cl 

8d 

Oa 

4d 

0c41 

f 8 

06 

bf 

bO 

01 

60 

26 

bf 

6d 

Of 51 : 

af 

85 

b6 

ab 

b6 

20 

ab 

al 

6b 

0939 

03 

8c 

Ob 

03 

20 

d6 

cl 

a9 

b9 

0c49 

a5 

f 9 

e9 

07 

85 

f 9 

90 

01 

b2 

Of59 : 

ab 

ae 

c5 

02 

fO 

06 

20 

02 

cb 

0941 

00 

aO 

80 

a2 

eO 

85 

f 7 

84 

29 

0c51 

60 

c6 

f a 

60 

06 

be 

90 

Oa 

8c 

Of 61 : 

cb 

4c 

54 

a6 

60 

bd 

el 

c7 

41 

0949 

f 8 

86 

f a 

aa 

18 

aO 

00 

98 

50 

0c59 

26 

be 

98 

e9 

07 

a8 

bO 

02 

be 

Of69 : 

85 

b8 

38 

ab 

f 9 

eb 

f 7 

aa 

11 

0951 

65 

f 7 

9d 

00 

d8 

9d 

00 

da 

49 

0c61 

c6 

f 8 

46 

bf 

bO 

01 

60 

66 

8e 

Of 71 

ab 

fa 

e5 

f 8 

4a 

8a 

6a 

4a 

63 

0959 

08 

a5 

f 8 

69 

00 

9d 

00 

d9 

40 

0c69 

bf 

a5 

f 9 

69 

08 

85 

f 9 

bO 

9c 

Of79 : 

4a 

85 

b6 

ab 

f 7 

85 

f 9 

ab 

c7 

0961 

28 

a5 

fa 

69 

00 

9d 

00 

db 

ec 

Oc71 

01 

60 

e6 

fa 

60 

98 

29 

07 

39 

Of 81 

f 8 

85 

fa 

8c 

ab 

a6 

2c 

98 

be 

0969 

e8 

c8 

cO 

08 

90 

el 

a5 

f 7 

85 

0c79 

c9 

07 

fO 

Oa 

c8 

ab 

f 9 

29 

37 

Of89 : 

c7 

70 

Of 

30 

54 

ce 

ab 

a6 

Oa 

0971 

69 

3f 

85 

f 7 

08 

a5 

f 8 

69 

3e 

0 c 81 

07 

fO 

16 

c6 

f 9 

60 

98 

69 

37 

Of 91 

8c 

bO 

a6 

a9 

31 

8d 

ac 

a6 

d4 

0979 

01 

85 

f 8 

28 

a5 

fa 

69 

01 

5a 

0c89 

38 

a8 

a5 

f 8 

69 

01 

85 

f 8 

44 

Of 99 

dO 

Oa 

a9 

ff 

8d 

bO 

a6 

a9 

25 

0981 

85 

fa 

eO 

c8 

90 

c7 

20 

8d 

b7 

Oc91 

a5 

f 9 

29 

07 

fO 

03 

c6 

f 9 

94 

Of al 

11 

8d 

ac 

a6 

18 

a5 

b8 

a6 

58 

0989 

aO 

4c 

Of 

al 

aO 

fa 

a9 

00 

dO 

0c99 

60 

38 

a5 

f 9 

e9 

39 

85 

f 9 

30 

Of a9 

b6 

49 

00 

11 

f 7 

2c 

a9 

ff 

ae 

0991 

99 

ff 

df 

99 

f 9 

eO 

99 

f 3 

4a 

Ocal 

a5 

fa 

e9 

01 

85 

fa 

60 

98 

41 
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Listing 1. »Hires-Master« (Schluß) 


10 SRDN: CLS : MÜDE 1 

20 FQRI=0T0159STEP5:J=100+I/l.6 

30 LINE0,J,1,199 

40 LINEO,199—J,1,0 

50 L1NE319.J,319-1,199 

60 LINE319,199—J,319-1,0 

70 NEXT 

80 S1ZE2,3,16,0,0 
90 TEXT64,80,"HIRES-MASTER" 

100 TEXT98,120,"TASTE-.." 

110 LINE64,80+3*8,320-64,80+3*8 
120 POKE198,0:WAIT19B,1 
130 ECLS20:M0DE2:X=319:Y=199 
140 FDRK=OT01:FORJ=1T0200 
150 FDRI=OTOYSTEPJ 

160 LINEI, I , X—I, Y—I: HNE1, Y—I, X—I, I 

170 NEXTI,J,K 

180 FORI=1TO100:NEXT 

190 M0DE2:X=319:Y=199 

200 FORI=OTOY 

210 LINEI,I,X-I,Y 

220 LINEX—I,Y—I,1,0 


230 LINEO,Y-I,I,I 
240 LINEX,I,X-I,Y-I 
250 LINEI,1,X-I,Y-I 
260 NEXT 

270 M0DE2:X=160:Y=100 

280 FORK=OTO1:FOR J=1TO188:FORI=188T00STEP-J 

290 C1RCLEX,Y,1 

300 NEXTI,J,K 

310 M0DE1:X=160:Y=100 

320 FORI=10OT00STEP-4 

330 CIRCLEX, Y , Y—I, I 

340 NEXT 

350 P0KE19B,0:WAIT19B,1 
360 ECLS15: MQDE2: X=110: Y=50 
370 F0RI=0T099STEP2 
380 CIRCLEX+I/2.Y+I/2,I 
390 NEXT 

400 P0KE198,C>:WAIT19B,1 
410 ECL515:MODE2:Y=100:A=63 
420 F0R3=0TD1 
430 FORI=0T0255 
440 CIRCLEI,Y,IANDA 


assaa 


138 


SONDERHEFT 19 













C64 


GRAFIK-LISTING 


450 NEXT 
460 NEXT 

470 ECLB15:M0DE2:Y=100:R=30*RND(1)+20 

480 FORJ=OT01 

490 F0RI=0T0319 

500 CIRCLEI,Y,R 

510 NEXT 

520 NEXT 

530 M0DE2:P0KE650,128:B=20 
540 S1ZE1,1,7,0,0 

550 TEXT0,0,"IN DIESEM DEMO WERDEN 11610 KREISE" 
560 TEXTO,10,“VERSCHIEDENER BROESSE IN NUR 180.9 S 
EK. “ 

570 TEXTO,20,"GEZEICHNET !!" 

580 POKE198,0:WAIT198,1:PDKE198,O 

590 SIZE1,1,8,0 

600 F0RA=1T0B:CLS 

610 FDRX=BT0320—BSTEPB 

620 FORY=BT0200-BSTEPB 

630 GETA*:IFAS<>""THEN680 

640 FORR=OTOBSTEPA 

650 CIRCLEX,Y,R 

660 NEXTR,Y,X,A 

670 POKE198,0:WAIT198,1 

680 ECLS15:M0DE2 

690 FÜRI=0T0319STEP2 

700 LINEI,0,1,199:NEXT 

710 FORI=0T0199STEP2 

720 LINEO,1,319,1:NEXT 

730 CONNECTO,4,0 

740 F0RI=1T05:C0NNECT4,0,0 

750 FOR J=0T0188STEPI 

760 CIRCLE 160,100, J: NEXT: NEXT 

770 POKE198,0:WAIT198,1 

780 FCLSl5:M0DF2 

790 S=10 

800 F0RX=0T0319—SSTEPS 
810 BLOCK X , 199, X +S-2, RND (1) *200: NEX T 
820 P0KE198,0:WAIT198,1 
830 CLS 

840 F0RY=0T0199—SSTEPS 

850 BLOCKO,Y,RND <1b *319,Y+S-2:NEXTY 

860 POKE198,0:WAIT198,1 

870 ECLS15:M0DE2: BRON 6H€R C 

880 F0RK=OT01:F0RJ=1T0200:F0RI=0T0199STEPJ 

890 BOXI,1,319-1,199-1 

900 NEXT:NEXT:NEXT 

910 MODE 1:P=—,1/180 

920 FORI=0T0360STEP18 

930 X=COS(I*P)*9 

940 Y=SIN<I*P)*9 

950 SIZEl,l,X+.5,Y+.5,I/90 

960 TEXT160+X*3, 100+Y*3, "HIRES-MASTER" 

970 NEXT 

980 POKE198,O:WAIT198,1:POKE198,0 
990 M0DE2 

1000 FCIRCLE160,100,140 

1010 ECLS15:MODE1:A*="HIRES-MASTER" 

1020 F0R1=1T04:T=I*8 
1030 SIZEI,I,T,0,1-1 
1040 TEXTO,Y,A* 

1050 TEXTO,199-Y-T,A* 

1060 Y=Y+T 
1070 NEXT 

10B0 SIZE4,4,32,0,0 
1090 TEXTO,83,"«•********" 

1100 P0KE198,0:WAIT198,1 
1110 ECLS15:M0DE1:A=360/99 
1120 F0RR=OTO99STEP3 
1130 I=R*A 

1140 ARC160,100,R,R,1,360-1 
1150 NEXT 

1160 PDKE198,0:WAIT198,1 
1170 P0KE56,128:CLR:A=19:DIMA*(A) 

11BO A*(O)="11112222444488881111222244448B88111122 
224444888B1111222244448888" 

1190 A*(1)="7777BBBBDDDDEEEE7777BBBBDDDDEEEE7777BB 
BBDDDDEEEE7777BBBBDDDDEEEE" 

1200 A*(2)="EEEEDDDDBBBB7777EEEEDDDDBBBB7777EEEEDD 
DDBBBB7777EEEEDDDDBBBB7777" 

1210 A$(3)="888844442222111188BB444422221111888844 
44222211118888444422221111" 

1220 A*(4)="AAAA5555AAAA5555AAAA5555AAAA5555AAAA55 
55AAAA5555AAAA5555AAAA5555" 

1230 A* ( 5 > = "FFFF888B8B888888FFFF8BB88B8888B8FFFF8B 
8B8888B8B8FFFF888888BB8888" 

1240 A* (6) = " FFFF80B080B08080B080808080808080FFFF80 
BOB0808080B080808080808080" 

1250 A* < 7)=”0000000001800240024002401E78200420041E 
78024002400240018000000000" 


1260 A*(8)="4747B383C5C5EEEE5C5C38387474EEEE474783 
83C5C5EEEE5C5C38'3B7474EEEE " 

1270 A*(9)="888B6767070707078B88767670707070888867 
67070707078888767670707070" 

1280 A* <10 > = "00007F7F7F7F7F7FOOOOF7F7F7F7F7F700007 
F7F7F7F7F7F000OF7F7F7F7F7F7" 

1290 A*(11)="88BB44442222555588B8444422225555BBB84 
444222255558888444422225555 " 

1300 A* (12 ) = "383B444482B29292B28244443838010138384 
444828292928282444438380101" 

1310 A$(13)="FFFF8181BFBFA1A1AlAlAlAlAlA1FFFFFFFF8 
181BFBFA1A1A1A1 Al A1A1A1FFFF" 

1320 A*(14)="8888555522225555BB885555222255558B885 
555222255558888555522225555" 

1330 A*(15)="8080404020201010080804040202010101010 
202040408081O10202040408080" 

1340 A*(16)="111122224444888B8BB844442222111111112 
222444488888888444422221111" 

1350 A*(17)="4004200810118822444422881110082004400 
820111022884444882210112008" 

1360 A*(18 > ="222022205550B88F555022205550B88F55502 
2205550888F5550222022202220“ 

1370 A* < 19)="CB27E44FF29FF93E7C7C3EF99FF24FE427CB4 
FE49FF23EF97C7CF93EF29FE44F» 

1380 F0RI=0T0A:R=INT(RND(1)*(A+1>):AS=A*(I):A*(I)= 
A*(R):A*(R)=A*:T=FRE(0):NEXT 
1390 ECLS15:MDDE1 

1400 FORI=OTOA:X=RND(1)*320:Y=RND(1)*200:R=RND(1)* 
30+20 

1410 MODEO:FCIRCLEX,Y,R:M0DE1 
1420 CIRCLEX,Y,R 
1430 SETMSKO,A$(I>:FILLX,Y 
1440 PDKE198,0:WAIT198,1:NEXT 
1450 MODE1:ECLS15 

1460 SETMSKO,"!11111111111FFFF111111111111FFFF1111 
11111111FFFFl11111111111FFFF" 

1470 FILL0,0:SIZE1,2,8,0,0 
1480 F0RI=0T01 
1490 FDRJ=3T00STEP-1 
1500 H=INT(RND(11*30) 

1510 FORK=OTOH 

1520 DUPLICATE7+J*80+K,43+1*72-K,38+0*80+K,70+1*72 
-K,8+J*80+K,42+I*72-K 
1530 ri£XT 

1540 REM HEX$0:RESUME8+J*80+K,42+1*72—K,39+0 *80+K, 
69+I*72-K:HEX*l 

1550 REMTRAPB+O *80+K,42+1*72-K,39+0*80+K,69+1*72-K 
1560 TEXT8+0*80+K+(3-LEN(STR* <H>> >*4,4B+I*72-K,STR 
#<H> 

1570 NEXT:NEXT 

1580 P0KE19B,0:WAITI98,1 

1590 ECLS15:MDDE2:C=1.6:X=319:YY=199 

1600 F0RI=0TD160STEP2:Y=INT(I/O 

1610 BOXI , Y, X—I, YY—Y 

1620 IFI>100THEN:ROLLO,110,60,210,140 

1630 NEXT 

1640 SIZE2,2,14,0 

1650 PDKE19B,0:WAIT19B,1 

1660 ECLS15:PAGEO,O:COLOR1,0:CLS:PAGE3,3:CLS:COLOR 
1,0:M0DE2 

1670 F0RI=0T01B7:PAGE(IAND1)*3,<(1+1)AND1)*3:FCIRC 

LEI 60,100,I:NEXT 

1680 POKE198,0:WAIT198,1:PAGEO,0 

Listing 2. Demo-Programm zur Grafikerweiterung »Hires- 
Master«, das einige Leistungen aufzeigt. 
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GRAFIK-LISTING 
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4 REM *** BILDSCHIRM/VARIABLEN INIT **** <103> 

5 POKE 53281,0:POKE 53280,0:POKE 646,1 <202> 

10 PRINT CHRS<142)CHR$< 8)"CCLR,RVSON,13SPA 

CE}HIRES - MASTERC13SPACE}"; <157> 

15 T$="0123456789ABCDEF” <048> 

20 PRINT"CRVSON.10SPACEOFILL - MUSTER EDIT 

ORC10SPACE}" <004> 

30 FOR 1=1 TO 16:PRINT"CYELLOW,5SPACE>_ 

■ MPYT • V-1 • V-1 - OnVC 1UQ A 


:MA=46:TX=1 <193> 

35 PRINT" CPURPLE, 8SPACE}Rg , C2SPACE}'m’?C2SPAC 

E>Rö’C3SPACE>" = TY=1 <059> 

40 PRINT"CHOME,3DOWN}”;TAB(23 >;"CRVSON,WHI 

TE,4SPACE0BEFEHLE:C4SPACE,RVOFF}" <083> 

41 PRINT TAB<23 > ; "CREDOSTEUERUNG••CURSOR" <082> 

42 PRINT TAB<23)i"C10SPACE}TASTEN" <023> 

43 PRINT TAB<23)i"PUNKT SETZEN:’ •" <075> 

45 PRINT TAB<23);"MEHR BEFEHLE:CRVSON,SPAC 

E}BCSPACE,RVOFF,DOWNJ * <087> 

46 PRINT TAB< 23);"CRVSONIECRVOFF,SPACEOEND 

EC10SPACE}" <002> 

47 PRINT TAB< 23 >;"CRVSON},CRVOFF,SPACEOZEI 

LENANFANGC2SPACE}" <173> 

48 PRINT TAB(23);"CRVSON}.CRVOFF,SPACEOZEI 

LENENDEC4SPACE}“ <086> 

49 PRINT TAB(23);"CRVSON5DCRVOFF,SPACEODAT 

ENAUSGABEC2SPACE>" <225> 

50 PRINT TAB(23);"CRVSONJXCRVOFF,SPACEOX-T 

AB SETZENC2SPACE}" <207> 

51 PRINT TAB(23);”CRVSON}YCRVOFF.SPACEOY-T 

AB SETZENC2SPACE}” <228> 

52 PRINT TAB < 23 >;”CRVSONJACRVOFF,SPACEOX-T 

AB SPRINGEN" <002> 

53 PRINT TAB(23 >;"CRVSONOBCRVOFF.SPACE}Y-T 

AB SPRINGEN" <023> 

54 PRINT TAB(23 >;"CRVSON5ZCRVOFF,SPACE54CS 

PACE.RVSONJSCRVOFF,SPACE}:C7SPACE}" <171> 

55 PRINT TAB<23);"NORMAL =LOESCHEN" <083> 

56 PRINT TAB< 23):"<SHIFT>:SETZENC2SPACE}" <108> 

57 PRINT TAB( 23 ) ; "<C=>C3SPACE} INVERT. " <080> 

98 : <074> 

99 REM **** STEUER-TASTATUR-ABFRAGE **** <110> 

100 A$ = 11 ":POKE 198,0: WAIT 198,1:GET AS <069> 

104 IF AS<>"CRIGHT>"THEN 130 <150> 

105 IF X=16 AND Y = 16 THEN GOSUB 1000:X=1:Y 

=l:GOTO 500 <066> 

110 IF X=16 THEN GOSUB 1000:X=1:Y = Y+1:GOTO 

500 <030> 

120 IF X<16 THEN GOSUB 1000:X=X+1:GOTO 500 <182> 
130 IF AS="B"THEN POKE 53280,2:GOTO 1900 <052> 

135 IF A$<>"CLEFT}"THEN 165 <005> 

150 IF X=1 AND Y>1 THEN GOSUB 1000:X=16:Y= 

Y-l:GOTO 500 <005> 

160 IF X>1 THEN GOSUB 1000:X=X-1:GOTO 500 <126> 

165 IF A$<>"CDOWN}"THEN 185 <183> 

170 IF Y=16 THEN GOSUB 1000:Y=1:GOTO 500 <249> 

180 IF Y<16 THEN GOSUB 1000:Y=Y+1:GOTO 500 <059> 
185 IF A$<>”CUP}"THEN 202 <115> 

190 IF Y=1 THEN GOSUB 1000:Y=16:GOTO 500 <028> 

200 IF Y>1 THEN GOSUB 1000:Y=Y-1:GOTO 500 <078> 

202 IF A$<>" "THEN 499 <212> 

203 IF X=16 AND MA=81 AND Y=16 THEN GOSUB 

1000:X=1 : Y=1 : MA=46 : GOTO 500 <210> 

204 IF X=16 AND MA=46 AND Y=16 THEN GOSUB 

1000:X=1 : Y=1 : MA=81:GOTO 500 <163> 

205 IF X=16 AND MA=46 THEN GOSUB 1000:X=1= 

Y=Y+1:MA=81:GOTO 500 <065> 

210 IF X=16 AND MA=81 THEN GOSUB 1000:X=1= 

Y=Y+1:MA=46:GOTO 500 <034> 

215 IF MA=46 THEN GOSUB 1000:X=X+1:MA=81:G 

OTO 500 <136> 

220 IF MA=81 THEN GOSUB 1000:X=X+1:MA=46:G 

OTO 500 <017> 

499 A$="":GOTO 100 <091> 

500 MN=PEEK(1108+X+Y*40):POKE 1108+X+Y*40, 

43:POKE 1108+XA+YA*40,MA:A$="":MA=MN <169> 
510 GOTO 100 <184> 

998 •• <212> 

999 REM *** UPROG X -> XA Y -> YA ***** <233> 

1000 XA=X:YA=Y:RETURN <141> 

1897 : <095> 

1898 REM **** ZUSAETZLICHE BEFEHLE ***» <087> 

1900 PRINT"CHOME,23DOWN,6SPACE,RVSONOBEFEH 

LSEINGABECRVOFF}" <203> 

1950 POKE 198,0:WAIT 198,1:GET AS <096> 

2000 IF ASO“CCLR}"THEN 2010 <134> 

2005 X=l:Y=l:GOSUB 1000:PRINT"CHOME,2DOWN} 

":FOR 1=1 TO 16:PRINT"CYELLOW,5RIGHT} 


.":NEXT 

2006 MA=43:GOTO 2600 

2010 IF AS="CHOME}"THEN GOSUB 1000:X=1=Y=1 
:GOTO 2600 

2020 IF A$="E"THEN INPUT"CHOME,22DOWN}WIRK 
LICH BEENDEN";FS:IF F$="J"THEN END 

2025 PRINT"CHOME,22DOWN,38SPACE}”:F$=“” 

2030 IF A$=","AND X<>1 THEN GOSUB 1000:X=1 
:GOTO 2600 

2040 IF A$="."AND X<>16 THEN GOSUB 1000:X= 
16:GOTO 2600 

2050 IF A$="Z"THEN FOR J=0 TO 15:POKE 1109 
+Y#40+J,46:NEXT:J=0:MA=46:GOTO 2700 

2051 IF A$="ä"THEN FOR J=0 TO 15:POKE 1109 
+Y*40+J,81:NEXT:J=0:MA=81:GOTO 2700 

2052 IF ASO'"2"THEN 2059 

2053 FOR J=0 TO 15=IF PEEK<1109+Y*40+J>=46 

THEN POKE 1109+Y*40+J,81:GOTO 2055 

2054 IF PEEK(1109+Y*40+J)=81 THEN POKE 110 
9+Y*40+J,46 

2055 NEXT:J=0:IF MA=46 THEN MA=81:G0T0 270 
0 

2056 IF MA=B1 THEN MA=46:GOTO 2700 

2058 IF A$="S"THEN FOR J=1 TO 16:POKE 1109 
+J*40+X-1.46:NEXT:J=0:MA=46:GOTO 2700 

2059 IF A$="Ä"THEN FOR J=1 TO 16:POKE 1109 
+J#40+X-l.81 :NEXT: J = 0:MA=81 .-GOTO 2700 

2060 IF AS="X"THEN TX=X:PRINT"CHOME,2DOWN, 
24SPACE}"=POKE 1108+X,93:GOTO 2700 

2061 IF ASO"T"THEN 2070 

2062 FOR J=1 TO 16:IF PEEK<1109+J*40tX-l>= 
46 THEN POKE 1109+J*40+X-1,81:GOTO 20 
65 

2063 IF PEEK<1109+J*40+X-1)=81 THEN POKE 1 
109+J*40+X-1,46 

2065 NEXT:J=0:IF MA=46 THEN MA=81:G0T0 270 
0 

2066 IF MA=81 THEN MA=46:GOTO 2700 

2070 IF AS="Y"THEN TY=Y:FOR J=1 TO 17:POKE 
1107+J*40,96:NEXT:J=0:POKE 1107+Y*40 
,64:GOTO 2700 

2080 IF A$="A"AND XoTX THEN GOSUB 1000:X= 
GOTO 2600 

2090 IF A$="B"AND YoTY THEN GOSUB 1000:Y= 
TY:GOTO 2600 

2100 IF AS=CHRS<13)THEN GOSUB 1000:X=1=Y=Y 
+l:GOTO 2600 

2110 IF ASO"I"THEN 2400 

2114 : 

2115 REM *** BEFEHL ’ INVERTIEREN ' **** 
2120 POKE 1108+X+Y*40,MA 
2130 FOR 1=1 TO 16 
2140 FOR J=1 TO 16 

2150 IF PEEK(1108+1+J*40 >=46 THEN POKE 110 
8+I+J*40,81:GOTO 2170 
2160 IF PEEK(1108+1+J*40>=81 THEN POKE 110 
8+I+J*40,46 
2170 NEXT 
2180 NEXT 

2190 IF MA=46 THEN MA=81:G0T0 2210 
2200 IF MA=81 THEN MA=46 
2210 A$="CRIGHT}":GOTO 105 

2398 : 

2399 REM *** DATENBERECHNUNG **** 

2400 IF ASO "D"THEN 2500 

2404 PRINT"CHOME,23DOWN,6SPACE,RVSON}DATEN 
BERECHNUNGCRVOFF,3UP}" 

2405 POKE 1108+X+Y*40,MA:W=0 
2410 FOR Z=1 TO 16 


2412 

2414 

2416 

2418 

2420 


FOR C=0 TO 3 
FOR S=1 TO 4 

IF PEEK(1108+Z*40+C*4+S)=81 THEN W 
=W+2t(4-S) 


NEXT:TE$=MID$< TS,W+l,1):S$=S$+TES:P 
RINT TES;:W=0:TE$="" 

2422 :NEXT 

2424 NEXT:S$="" 

2425 POKE 1108+X+Y*40.43 

2500 PRINT"CHOME,23DOWN,24SPACE}":POKE 532 
80,0:GOTO 100 

2600 PRINT"CHOME,23DOWN,24SPACE}":POKE 532 
80,0:GOTO 500 

2700 PRINT"CHOME,23DOWN.24SPACE}":POKE 532 
80,0:A$="CRIGHT}":GOTO 110 
9999 PRINT"CCLR}"CHRS(9) :POKE 53280,0:POKE 
646,1:LIST 2100-2299 

Listing 3. Der Fill-Mustereditor für Hires-Master 


<084> 

<006> 

<026> 

<080> 

<068> 

<108> 

<092> 

<023> 

<037> 

<152> 

<016> 

<007> 

<006> 

<215> 

<144> 

<005> 

<060> 

<160> 


<052> 

<164> 

<016> 

<225> 


<150> 

<028> 

<116> 

<076> 

<204> 

<058> 

<087> 

<109> 

<250> 

< 012 > 

<214> 

<081 > 
< 148> 
<158> 
< 121 > 
<052> 
<132> 
<088> 
<126> 
<251 > 

< 019 > 
<245> 
<156> 
<141> 
<209> 

< 020 > 

<108> 

<081 > 
<132> 
<253> 
<006> 

<178> 

<028> 

<244> 

<088> 
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ANWENDUNG 


Simplex optimiert lineare 
Zusammenhänge 


Mit Simplex 64 können Sie eine Vielzahl von Pro¬ 
blemen aus der Betriebswirtschaft, der Technik 
und dem häuslichen Bereich ohne großen Zeit¬ 
aufwand sicher lösen. Das Ergebnis stellt die 
bestmögliche Problemlösung dar. 

O hne Einschränkungen ist das Programm Simplex 64 
(Listing 1) auf einem C 64 in Verbindung mit einem 
Drucker MPS 801 lauffähig. Ein 80-Zeichen-Bild- 
schirm (Hardware oder Software) erleichtert die Bearbei¬ 
tung umfangreicher Aufgaben. 

Eine grundlegende Voraussetzung ist bei der Anwen¬ 
dung der Simplex-Methode zu beachten; die dem Problem 
entsprechenden funktionalen Zusammenhänge müssen 
durch lineare Gleichungen oder Ungleichungen zu be¬ 
schreiben sein. 

Anhand eines einfachen Beispiels aus der Arbeitsvorbe¬ 
reitung eines Produktionsbetriebs sollen im folgenden die 
Übersetzung eines Problems in ein mathematisches 
Modell, sowie das Prinzip der Simplex-Methode erläutert 
werden. 

Beispiel 1 

Der Betrieb stellt zwei unterschiedliche Produkte PI und 
P2 her. Aus der Differenz der Erlöse und der direkten 
Kosten (Rohmaterial) ergeben sich die folgenden 
Deckungsbeiträge: 

300 Mark/Stück für PI 
600 Mark/Stück für P2 

Für die Produktion stehen drei verschiedene Maschinen 
A, B und C zur Verfügung. Die Herstellung einer Einheit von 
PI erfordert eine zweistündige Bearbeitung auf Maschine 
A und eine dreistündige auf Maschine B. Für P2 müssen 6 
Maschinenstunden angesetzt werden - drei auf Maschine 
A und drei auf Maschine C. Aufgrund unterschiedlich lan¬ 
ger Wartungszeiten ergeben sich verschiedene Nutzungs¬ 
kapazitäten für die Maschinen. 

190 Stunden für Maschine A 
170 Stunden für Maschine B 
180 Stunden für Maschine C 
Die fixen Kosten des Unternehmens im untersuchten 
Zeitraum belaufen sich auf 2700 Mark. Der Gewinn aus 
dem Verkauf der beiden Produkte soll optimiert, das heißt 
maximiert werden. 


Das mathematische Modell 


Die angenommene Problemstellung läßt sich durch ein 
System von linearen Gleichungen und Ungleichungen 
beschreiben - dem mathematischen Modell. Die Zielfunk¬ 
tion ergibt sich aus der Forderung nach maximalem 
Gewinn (Maximumaufgabe). 

G(max) = 300*XI + 600*X2 - 2700 

Die sogenannten Strukturvariablen XI und X2 bedeuten 
darin die, im betrachteten Zeitraum hergestellten Mengen 
der Produkte PI und P2. 

Wären die produzierbaren Mengen unbegrenzt, so 
würde auch der Gewinn ins Unendliche wachsen. Ein¬ 


schränkungen (Restriktionen) der Produktion ergeben sich 
aus den zur Verfügung stehenden Nutzungskapazitäten 
der Maschinen A, B und C in Relation zu den notwendigen 
Bearbeitungszeiten für die zwei Produkte. Im Modell wird 
dieser Zusammenhang durch drei Ungleichungen (3 
Maschinen) beschrieben. 

2*X1 + 3*X2 < 190 
3*X1 + 0*X2 < 170 
0*X1 + 3*X2 < 180 

Ferner ist zu beachten, daß keine negativen Mengen pro¬ 
duziertwerden können; es ergeben sich die Nichtnegativi¬ 
tätsbedingungen für XI und X2 
XI > 0 
X2 > 0 

Grafische Lösung 


Bei zweidimensionalen Problemen, also Problemen mit 
nur zwei Strukturvariablen, besteht die Möglichkeit der gra¬ 
fischen Lösungsfindung. Zum besseren Verständnis der 
Verfahrensweise bei einer Optimierung soll die zeichneri¬ 
sche Methode anhand des Beispiels 1 kurz vorgestellt wer¬ 
den (Bild 1). 

Auf den Achsen eines karthesischen Koordinatensy¬ 
stems werden XI und X2 aufgetragen. Die Restriktionsglei¬ 
chungen oder Ungleichungen können als Geraden in das 
Koordinatensystem eingezeichnet werden. Handelt es sich 
um Ungleichungen, so trennen sie einen zulässigen von 
einem unzulässigen Lösungsbereich. Der Beginn des 
unzulässigen Bereichs wird durch Schraffur entlang der 
Gerade gekennzeichnet. Entsprechend werden auch die 
Nichtnegativitätsbedingungen behandelt - Schraffur der 
Abszisse und Ordinate (Koordinatenachsen). Somit erhält 
man einen geschlossenen zulässigen Lösungsbereich, 
innerhalb dessen jeder Punkt als Lösung in Frage kommt. 
Gesucht ist jedoch der optimale Punkt, also das Produk¬ 
tionsprogramm mit dem maximalen Gewinn. Um diesen 
Punkt aufzufinden, zeichnet man die Zielfunktion ein. Da 
die Zielfunktion außer den Strukturvariablen XI und X2 



Bild 1. Grafische Lösung zum ersten Beispiel 
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noch den Gewinn G als Variable enthält, kann sie im zweidi¬ 
mensionalen Koordinatensystem nur dargestellt werden, 
wenn man für G feste Werte annimmt. Für verschiedene 
Werte von G ergeben sich unterschiedliche, einander 
parallele Geraden, die sogenannten »Iso-Gewinnlinien« 
(Linien gleichen Gewinns). Vorstellbar ist auch, daß eine 
Gewinnlinie ausgehend vom Koordinatenpunkt stetig 
parallel verschoben wird. Das gesuchte Gewinnmaximum 
liegt an der Stelle, an der, der durch den zulässigen 
Lösungsbereich gehende Teil der Gewinnlinie auf einen 
Punkt zusammenschrumpft. Man erkennt, daß der opti¬ 
male Punkt in jedem Fall ein Eckpunkt des Lösungsbe¬ 
reichssein muß. Nur wenn eine Begrenzungsgerade paral¬ 
lel zu der Gewinnlinie verläuft, kann das Gewinnmaximum 
aus einer Geraden (Punktmenge) bestehen; man bezeich¬ 
net dies als Entartungsfall. Auch im Entartungsfall gehören 
aber die entsprechenden Eckpunkte zur Optimallösung, so 
daß die zuvor gewonnene Erkenntnis selbst in diesem Fall 
ihre Gültigkeit behält. 

Berechnung noch der Simplex-Methode 


Das Prinzip der rechnerischen Lösungsfindung nach der 
Simplex-Methode besteht darin, ausgehend vom Aus¬ 
gangspunkt (normalerweise Koordinatenursprung), iterativ 
(schrittweise) von Eckpunkt zu Eckpunkt zu springen bis 
das Optimum erreicht ist. 

Da das Rechnen mit Ungleichungen umständlich ist, soll 
zunächst das mathematische Modell zum Beispiel 1 
geringfügig modifiziert werden. 

Durch das Hinzufügung sogenannter »Schlupfvaria¬ 
blen« wird das Ungleichungssystem der Restriktionen in 
ein Gleichungssystem überführt. e-v^R 

Y1 + 2*X1 + 3*X2 = 190 
Y2 + 3*X1 + 0*X2 = 170 
Y3 + 0*X1 + 3*X2 = 180 

Die Schlupfvariablen Y1, Y2 und Y3 stellen die ungenutz¬ 
ten Kapazitäten der Maschinen A, B und C dar. Die Nicht¬ 
negativitätsbedingungen müssen nun auf die Schlupf¬ 
variablen ausgedehnt werden. 

X1,X2,Y1,Y2,Y3 ;> 0 

Das gewonnene Gleichungssystem ohne die Zielfunk¬ 
tion besteht aus drei Gleichungen mit fünf Unbekannten, ist 
also unbestimmt. Somit scheidet eine vollständige Lösung, 
zum Beispiel mit dem Gaußschen Algorithmus, aus. 

Es gibt unendlich viele Lösungen, von denen, wie wir 
wissen, nur die Eckpunkte zur Bestimmung des Optimums 
relevant sind. Ein Eckpunkt (beim zweidimensionalen Pro¬ 
blem) stellt den Schnittpunkt zweier Begrenzungslinien 
dar; das Erreichen eines Eckpunkts ist gleichbedeutend 
mit dem Nullsetzen zweier Variablen. Damit wird das Glei¬ 
chungssystem lösbar! 

Noch einmal in allgemeiner Formulierung: 

Zur Beschreibung eines n-dimensionalen Problems exi¬ 
stiere ein System aus m Gleichungen einschließlich der 
Zielfunktion. Von den »m+n« Variablen (n Strukturvaria¬ 
blen und m Schlupfvariablen) sind die Werte von genau m 
Variablen bestimmbar, wenn die übrigen n Variablen zu 
Null gesetzt werden. An dieser Stelle sei darauf hingewie¬ 
sen, daß G (Gewinn) formal die Schlupfvariable der Ziel¬ 
funktion ist. Die n zu Null gesetzten Unbekannten werden 
als »Nichtbasisvariablen« bezeichnet, während die übrigen 
m Variablen »Basisvariablen« heißen; sie bilden die Basis 
einer Lösung. 

Unzulässige Ausgangslösung 

Üblicherweise geht man bei einer Berechnung nach der 
Simplex-Methode vom Koordinatenursprung (Nullpunkt) 


als Eckpunkt für die Ausgangslösung aus. Es besteht die 
Möglichkeit, daß der Nullpunkt außerhalb des zulässigen 
Lösungsbereichs der Problemstellung liegt. Dieser Fall ist 
im Programm SIMPLEX 64 entsprechend berücksichtigt; 
die Lösungsfindung wird nicht beeinträchtigt. 

Gleichungen als Restriktionen 

Bei bestimmten Problemstellungen kann es Vorkommen, 
daß neben Ungleichungen auch Gleichungen als Restrik¬ 
tionen auftreten. Es erscheint zunächst sinnlos einer Glei¬ 
chung eine Schlupfvariable zuzuordnen. Die Schlupfvaria¬ 
ble hat aber auch die Aufgabe, in der Ausgangslösung, in 
der alle Strukturvariablen zu Null gesetzt werden, den Wert 
der rechten Seite (RS) der betreffenden (Un-)Gleichung 
anzunehmen, so daß diese erfüllt ist. Eine Gleichung, die 
nur Strukturvariablen (also keine Schlupfvariablen) ent¬ 
hält, ist in der Ausgangslösung nicht erfüllt, es sei denn ihre 
rechte Seite (RS) wäre Null. Daher ist im Programm SIM¬ 
PLEX 64 vorgesehen, daß sowohl jeder Ungleichung, als 
auch jeder Gleichung eine Schlupfvariable zugeordnet 
wird. Eine Lösung ist aber nur dann zulässig, wenn die 
Schlupfvariablen von Gleichungen zu Null, das heißt aus 
der Basis entfernt werden. Zu diesem Zweck sind diese 
Variablen bei der Eingabe zu sperren. 


Freie Strukturvariablen 

Bei einigen Optimierungsaufgaben treten Strukturvaria¬ 
blen auf, für die die Nichtnegativitätsbedingungen keine 
Gültigkeit besitzen. Sie werden als freie Strukturvariablen 
bezeichnet und müssen bei der Berechnung endgültig in 
die Basis gelangen. Zu diesem Zweck ist es erforderlich, 
derartige Variablen bei der Eingabe zu kennzeichnen. 


Minimumprobleme 

Im Beispiel 1 wurde eine typische Maximumaufgabe 
beschuhen. Der Zielfunktionswert G (Gewinn) sollte maxi¬ 
miert werden. Häufig sind auch jene Fälle, in denen das 
Optimum ein Minimum darstellt; zum Beispiel sollen die 
Kosten minimiert werden. Da das Programm für die Be¬ 
arbeitung von Maximumproblemen ausgelegt ist, emp¬ 
fiehlt es sich, bei Minimumaufgaben das mathematische 
Modell entsprechend anzupassen. Sollen die Kosten mini¬ 
miert werden, so maximiert man statt dessen die negativen 
Kosten. 

Beispiel 2: 

Minimumaufgabe 

Zielfunktion Z(min) - 3*X1 - 2*X2 = 0 
Restriktionen 1*X1 + 1*X2 2 = 30 
2*X1 + 1*X2 > 50 
1 *X1 + 3*X2 > 40 


Nichtnegative 

Bedingungen 

X1.X2 > 0 

Analoge Maximumaufgabe 

Zielfunktion Z(max) + 3*X1 + 2*X2 = 0 
Z(max) = -Z(min) 

Restriktionen -1 *X1 - 1 *X2 < -30 


-2*XI -1*X2 < -50 


-1*X1 - 3*X2 < -40 

Nichtnegative 

Bedingungen X1,X2 < 0 


Simplex-Tableau 
(Standardein- und -ausgabe) 


Um eine Standardeingabe zu ermöglichen, ist es erforder¬ 
lich, die Gleichungen und Ungleichungen des mathemati¬ 
schen Modells in ein Standardformat zu bringen. 
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C64 


ANWENDUNG 


+Z + a(0,l)*Xl + a(0,2)#X2 +...+ a(0,n)*Xn = RS(O) 


+ a(l,l)*Xl + a(l,2)*X2 +...+ a(l,n)*Xn<RS(l) 
+ a(l,2)#Xl + a(2,2)#X2 +...+ a(2,n)*Xn<RS(2) 


+ a(m,l)#Xl + a(m,2)*X2 +...+ a(m,n)#Xm<RS(m) 

Die Umformung ist so vorzunehmen, daß sämtliche 
Strukturvariablen XI bis X2 sowie die Zielfunktionsvariable 
Z auf der linken Gleichungsseite stehen. Die Änderung der 
Vorzeichen ist dabei entsprechend zu berücksichtigen. Auf 
der rechten Seite RS verbleiben nur die absoluten Glieder 
(Glieder ohne Variable). Tritt bei den Restriktionen ein > 
oder >-Zeichen auf, so ist die gesamte Ungleichung mit-1 
zu multiplizieren; aus der Zuordnung > wird dann <. Nun 
kann die Eintragung der Koeffizienten a(0,1) bis a(m,n) der 
Strukturvariablen sowie der rechten Seiten RS(0) bis 
RS(m) ins Simplex-Tableau erfolgen. 


XI X2 . Xn RS 


z 

a( 0 , 1 ) 

a( 0 , 2 ) 

. a(0,n) 

RS(0) 

Y1 

8(1.1) 

a{ 1 . 2 ) 

. a(1.n) 

RS(1) 

Y2 

■(2.1) 

a(2.2) 

. a(2,n) 

RS(2) 

Ym 

a(m, 1 ) 

a(m,2) 

. a(m,n) 

RS(m) 


Programmbeschreibung 


Das Programm Simplex 64 (Listing 1) ist mit LOAD 
" Name", 8 zu laden und mit RUN zu starten. Sämtliche für 
den Programmablauf notwendigen Eingaben erfolgen im 
Dialog mit dem C 64. 

Nach dem Start von SIMPLEX 64 erscheint die Frage: 
80 ZEICHENKARTE -(J/N) 

Für die Bearbeitung von Optimierungsaufgaben mit 
mehr als zwei Strukturvariablen ist ein 80-Zeichen- 
Bildschirm aus Gründen der Übersichtlickeit vorteilhaft. 
DRUCKERAUSGABE ? (J/N) 

ALLE LÖSUNGEN? (1) 

NUR OPTIMUM? (2) 

Zwei unterschiedliche Druckoptionen stehen für die Aus¬ 
gabe auf einem Drucker MPS-801 zur Verfügung. Bei der 
Wahl der Option (1) werden sämtliche Iterationen des Com¬ 
puters protokolliert. Sollen nur das Ausgangstableau und 
die optimale Lösung ausgedruckt werden, ist Option (2) zu 
wählen. 

Die beiden folgenden Fragen 
ANZAHL STRUKTURVARIABLEN? 

ANZAHL RESTRIKTIONEN? 

bedürfen kaum einer Erklärung; »Anzahl Restriktionen« 
bezieht sich auf die Anzahl der (Un-)Gleichungen aus¬ 
schließlich der Zielfunktion. 

Die nächsten Fragen betreffen die beschriebenen Son¬ 
derfälle »Gleichungen als Restriktionen« und »Freie Struk¬ 
turvariabien«. 

FREIE STRUKTURVARIABLEN? (J/N) 

GESPERRTE SCHLUPFVARIABLEN? (J/N) 

Enthält das Optimierungsproblem entsprechende Varia¬ 
blen, so sind im weiteren Verlauf die Spalten beziehungs¬ 
weise Zeilen des Ausgangstableaus anzugeben, in denen 
diese Variablen auftreten. 

Damit ist das Problem bereits weitgehend umschrieben 
- es fehlt nur noch die Eingabe der Koeffizienten und der 
RS (rechte Seite). 


Auf dem Bildschirm erscheint die erste Zeile (Zielfunk¬ 
tion) eines leeren Simplex-Tableaus, oder, bei nicht ausrei¬ 
chender Bildschirmbreite, ein Teil derselben. Dieses 
Tableau ist nun vom Anwender entsprechend dem (hoffent¬ 
lich) vorliegenden mathematischen Modell auszufüllen. 
Jede Eingabe eines Wertes ist mit < RETURN > abzu¬ 
schließen. 

Der C 64 beginnt mit der Berechnung, sobald der letzte 
Wert eingegeben wurde. Erscheint nach Beendigung der 
Iteration (Meldung: RECHNUNG BEENDET - OPTIMUM) 
nicht das vollständige Simplex-Tableau auf dem Bild¬ 
schirm, so kann durch Drücken einer Taste der Rest abge¬ 
fragt werden. 

Interpretation des Ergebnis-Tableaus 


Die Interpretation des Ergebnisses soll anhand des Bei¬ 
spiels 1 erläutert werden. Die Bilder 2 und 3 zeigen das 
Eingabe- (0. Iteration) und das Ausgabetableau. Auffällig 
ist, daß einige Variablen ihre Plätze getauscht haben. Die 
Variablen in der Spalte am linken Rand sind die Basisvaria¬ 
blen - sie stellen die Basis der Lösung dar. Die Variablen in 
der oberen Zeile sind Nichtbasisvariablen - sie haben den 
Wert Null. 

Das abzulesende optimale Produktionsprogramm sieht 
also wie folgt aus: 

Die herzustellende Menge der Produkte PI (XI = 5)undP2 
(X2 = 60) ergeben sich zu 5 Stück vom PI und 60 Stück von 
P2. Damit sind die Maschinen A (Y1 = 0) und C (Y3 = 0) 
lOOprozentig ausgelastet. Für Maschine B verbleibt eine 
nicht genutzte Kapazität von 155 Stunden (Y2 = 155). Der 
Zielfunktionswert Z, also der Gewinn des Unternehmens, 
beläuft sich im betrachteten Zeitraum bei Durchführung 
des optimalen Produktionsprogramms auf 34800 Mark. 
Die Zielfunktionskoeffizienten (150 und 50) beziffern die 
sogeannten Opportunitätskosten der Maschinen A(Y1) und 
C (Y3). Jede Stunde Minderarbeit der Maschine A bedeutet 
eine Gewinnschmälerung von 150 Mark, jede Stunde 
Mehrarbeit einen betragsgleichen Gewinnzuwachs. 

Natürlich steht jede Stunde Minder- oder Mehrarbeit der 
Maschine A im direkten Verhältnis zur Anzahl der herge¬ 
stellten Produkte PI. Ein Beispiel soll diesen Zusammen¬ 
hang verdeutlichen. Annahme: Maschine A fällt vier Stun¬ 
den aus. Daraus folgt unmittelbar, daß die Nutzungskapazi¬ 
tät der Maschine A (Y1) von 190 Stunden auf 186 Stunden 
sinkt. Wie sich dieser Ausfall auf die Anzahl der hergestell¬ 
ten Produkte PI (XI) bemerkbar macht, läßt sich dem 
Lösungstableau (Bild 3) entnehmen. Dazu ist die Zeile hin¬ 
ter der Strukturvariablen XI in eine Gleichung zu 
überführen: 

0.5*Y1 - 0.5*Y3 = Anzahl der hergestellten Produkte PI 
Y1, Y3 = Nutzungskapazitäten der Maschine A, C in 
Stunden 




**# 

SIMPLEX TABLEAU 




X 1 

X 2 

RS 


Z 

-300 

-600 

-2700 

Y 

1 

2 

3 

190 

Y 

2 

3 

0 

170 

Y 

3 

0 

3 

180 


Bild 2. Eingabetableau von »Simplex 64« 
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C64 


*■** 

SIMPLEX 

TABLEAU 2.ITERATION *** 


Y 1 

Y 3 

RS 

Y 0 

150 

50 

34800 

X. 1 

.5 

-.5 

5 

Y 2 

-1.5 

1.5 

155 

X 2 

0 

.33 

60 

**** 

RECHNUNG 

BEENDET **** 



OPTIMUM **** 



Bild 3. Lösungstableau von »Simplex 64« 


410 PRINT"<CLR,5SPACE,RVS0N>SIMPLEX 64<RV0 

FF>":PRINT:PRINT:PRINT:PRINT <1B4> 

420 INPUT"C3SPACE>ANZAHL STRUKTURVARIABLEN 

“;N <049> 

430 PRINT <022> 

440 INPUT"{3SPACE}ANZAHL RESTRIKTIONEN “;M <213> 
450 M=M+1 <003> 

460 PRINT"{CLR,4SPACE,RVSON>SIMPLEX 64<RV0 

FF>":PRINT:PRINT:PRINT:PRINT <234> 

470 DIM A(M,N),B(M,N),E(M),X*(N),X1$(N),V$ 

(M),Y1*(M) <180> 

480 PRINT"<3SPACE>FREIE STRUKTURVARIABLEN 

? (J/N)" <062> 

490 GET A* <190> 

500 IF A*="J”THEN DIM SP*(N) :GOTO 530 <247> 

510 IF A*="N“THEN 610 <0B4> 

520 GOTO 490 <108> 

530 : <254> 

540 PRINT"<CLR,4SPACE,RVSON>FREIE STRUKTUR 

VARIABLEN<RVOFF>":PRINT <076> 

550 FOR 1=1 TO N <027> 

560 PRINT“<D0WN,3SPACE>IN SPALTE“!"? (J/N) 


0.5, -0.5 = Multiplikationsfaktoren in Stück/Stunde 
Daraus folgt: 

0.5*186-0.5*180 = 3 = Anzahl der hergestellten Produkte 
PI (XI). Bemerkenswert ist noch das negative Vorzeichen 
beim zweiten Multiplikationsfaktor. Fällt Maschine C (Y3) 
aus, so erhöht sich die Anzahl der hergestellten Produkte 
PI (XI). 

Allerdings nimmt P2 (X2) im gleichen Verhältnis ab. 

Der vierstündige Ausfall von Maschine A (Y1) beeinflußt 
natürlich die nicht genutzte Stundenkapzität der Maschine 
B (Y2). Auch das läßt sich dem Lösungstableau (Bild 3) 
entnehmen: 

Y2-1.5*Y1 + 1.5*Y3 = nicht genutzte Stundenkapazität 
der Maschine B (Y2) 

Angewendet auf das oben stehende Beispiel ergibt sich 
die nicht genutzte Stundenkapazität zu: 

170- 1.5*186 + 1.5*180 = 161 Stunden. 

Hinweise für interessierte Leser 
Als Ergänzung zu dieser Einführung in die Simplex- 
Methode werde ich bei entsprechender Resonanz eine 
umfangreiche Beispielsammlung zusammenstellen. 

(Manfred Buthz/ah) 


" <131> 
570 GET A* <016> 
580 IF A*=“"THEN 570 <031> 
590 IF A*="J"THEN SP*(I)="J" <10B> 
600 NEXT I <176> 
610 : <07B> 
620 PRINT"<CLR,4SPACE,RVS0N>SIMPLEX 64CRV0 

FF>”:PRINT:PRINT:PRINT:PRINT <140> 
630 PRINT"<3SPACE>GESPERRTE SCHLUPFVARIABL 

EN ? (J/N)" <087> 
640 GET A* <086> 
650 IF AS="J"THEN DIM Z*(M):GOTO 680 <127> 
660 IF A*="N"THEN 770 <032> 
670 GOTO 640 <194> 
680 : <148> 
690 PRINT"<CLR,4SPACE,RVSON JGESPERRTE SCHL 

UPFVARIABLEN <RVOFF >":PRINT <077> 
700 FOR 1=1 TO M—1 <061> 
710 PRINT"CD0WN,3SPACE>IN ZEILE"I"? (J/N)" <159> 
720 GET A* <166> 
730 IF A*=""THEN 720 <165> 
740 *•- A*="J"THEN Z*(I)="J" <236> 
750 NEXT I <070> 
760 : <228> 
770 REM *** EINGABE KOEFFIZIENTEN *** <214> 
780 : <250> 
790 FOR 11=1 TO N STEP W+l <217> 
800 PRINT"CCLRJ" <124> 
810 PRINT,"*#* SIMPLEX TABLEAU ***" :PRINT <228> 


820 X*(0)="RS 
830 PRINT, 


< 011 > 

< 011 > 


100 

REM 

***#**#**##*■»***#****###*#** 

<091 > 

840 

I2=I1+W 

<080> 

110 

REM 

* 


* 

<159> 

850 

IF I2>=N THEN I2=N 

< 118> 

120 

REM 

* 

SIMPLEX 64 

* 

<080> 

860 

FOR 1=11 TO 12 

<081 > 

130 

REM 

* 


* 

< 179> 

870 

X*(I)="X":XI*(I)=STR*(I):X*(I)=X*(I)+X 


140 

REM 

* 

BY 

* 

<244> 


1*(I) 

< 124> 

150 

REM 

* 


* 

<199> 

880 

PRINT"X"I, 

<030> 

160 

REM 

* 

M. BUHTZ 

* 

< 172> 

890 

NEXT I 

<212> 

170 

REM 

* 


* 

<219> 

900 

IF I>N THEN PRINT"RS ", 

< 129> 

180 

REM 

* 

GRAFENRING,13 

* 

< 195> 

910 

J1=J2+1 

<204> 

190 

REM 

* 

4230 WESEL 

* 

<027> 

920 

J2=J1+W 

< 196> 

200 

REM 

* 

TEL.: 0281/22431 

* 

<221 > 

930 

IF J2>=N THEN J2=N 

<208> 

210 

REM 

* 


* 

<003> 

940 

PRINT 

<024> 

220 

REM 

**************************** 

<2! 1 > 

950 

FOR 1=0 TO M—1 

<025> 

230 

3 




<206> 

960 

Y*(I)="Y":Y1*(I)=STR*(I):Y*(I)=Y*(I)+Y 



240 PRINT"<CLR,5SPACE,RVSON)SIMPLEX 64<RVD 
FF>“:PRINT:PRINT 

250 PRINT"<3SPACE>80 ZEICHENKARTE ? (J/N)" 
260 GET A* 

270 IF A*="J"THEN W=5:G0T0 300 
280 IF A*="N"THEN W=l:GOTO 300 
290 GOTO 260 
300 PRINT:PRINT:PRINT 

310 PRINT"{3SPACEJDRUCKERAUSGABE ? (J/N)": 
PRINT 

320 GET A* 

330 IF A*="N"THEN 410 

340 IF A*="J"THEN El=l:GOTO 360 

350 GOTO 320 

360 PRINT"<3SPACE>ALLE LOESUNGEN ? (1)“:PR 
INT 

370 PRINT"I3SPACE1NUR OPTIMUM ?<4SPACE>(2) 


380 GET E* 

390 IF E*<>"1“AND E*<>"2"THEN 380 
400 IF E*="2"THEN El=2 


< 169> 
<255> 
<216> 
<021 > 
<225> 
<06B> 

< 171 > 

<064> 

< 020 > 

< 152> 
<228> 
<072> 

<130> 

<040> 

< 112 > 
<221 > 
< 163> 


1*(I) <061> 
970 IF 1=0 THEN PRINT:PRINT;"<2SPACE>Z";:G 

OTO 1000 <155> 
980 IF 1=1 THEN PRINT <088> 
990 PRINT:PRINT;"Y"I; <239> 
1000 FOR J=J1 TO J2 <006> 
1010 PRINT,;:POKE 19,1:INPUT A(I,J):POKE 1 

9,0 <242> 
1020 NEXT J <094> 
1030 IF J>N THEN PRINT,”";:POKE 19,1:INPUT 

A(I,0):POKE 19,0 <027> 
1040 NEXT I <10B> 
1050 NEXT II <137> 
1060 IF E1O0 THEN GOSUB 2790 <109> 
1070 : <030> 
1080 REM*** PHASE 0' S(SPALTE) *** <225> 
1090 : <050> 
1100 FOR 1=1 TO N <069> 
1110 IF SP*(I)="J"THEN S=I:SPS(I)=“S“:GOTO 

1170 <100> 
1120 NEXT I <18B> 
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1130 

BOTQ 1220 


<150> 

1950 

FOR 1=0 TO M-l 

<009> 

1140 

: 


<100> 

1960 

IF I=R THEN 1980 

< 141 > 

1150 

REM»»* PHASE 0' R(ZEILE) *** 


<076> 

1970 

B(I,S)=-A(I,S)/A(R,S> 

<050> 

1160 

: 


< 120> 

1980 

NEXT I 

<030> 

1170 

R=INT(RND ( 1 )*M) +1 : T=T+1 


<059> 

1990 

■ 

<1B8> 

1180 

IF Z*(R)="S"OR A(R,S)=0 THEN 1170 


<074> 

2000 

FOR 1=0 TO M-l 

<059> 

1190 

IF T>100 THEN 2440 


<098> 

2010 

FOR J=0 TO N 

< 193> 

1200 

T=0:GOTD 1850 


<068> 

2020 

IF J=S OR I=R THEN 2040 

<241 > 

1210 

: 


<170> 

2030 

B (I , J) =A (I , J) — A (1,5) *B (R, J) 

<234> 

1220 

REM*** PHASE 0 R(ZEILE) *** 


<009> 

2040 

NEXT J 

<098> 

1230 

s 


< 190> 

2050 

NEXT I 

< 102> 

1240 

FOR 1=1 TO M—1 


<093> 

2060 

• 

<004> 

1250 

IF Z*(I)="J"THEN R=I:Z*(I)="S":GOTO 1 


2070 

REM *** UMGERECHNETES SIMPLEX TABLEAU 



310 


<056> 


*** 

<025> 

1260 

NEXT I 


<072> 

2080 

3 

< 124> 

1270 

GOTO 1360 


<178> 

2090 

IT=IT+1 

<240> 

12B0 

: 


<242> 

2100 

11=0:12=0:J1=0: J2=0 

<057> 

1290 

REM*** PHASE 0 S(SPALTE) *** 


<063> 

2110 

FOR 11=1 TO N STEP W+l 

<011> 

1300 

: 


<006 > 

2120 

IF N<=W+1 THEN 2130 

< 1B9> 

1310 

S=INT(RND(1)*N> +1:T=T+1 


<213> 

2130 

PRINT"<CLR >" 

<0S6> 

1320 

IF SP*(S)="S"OR A(R,S)=0 THEN 1310 


<201 > 

2140 

PRINT"<3SPACE>*** SIMPLEX TABLEAU "IT 


1330 

IF T>100 THEN 2530 


<236> 


"<LEFT}.ITERATION ***":PRINT 

<169> 

1340 

T=0:GOTO 1850 


<210> 

2150 

PRINT, 

<061 > 

1350 

: 


<056> 

2160 

12=11+W 

< 130> 

1360 

REM *** PHASE 1 R(ZEILE) *** 


< 159> 

2170 

IF I2=>N THEN I2=N 

< 136> 

1370 

: 


<076> 

2180 

FOR 1 = 11 TO 12 

< 131 > 

1380 

S=0:R=0 


< 183> 

2190 

PRINT X*(I> , 

<031 > 

1390 

FOR 1 = 1 TO M—1 


<245> 

2200 

NEXT I 

<252> 

1400 

IF A(1,0X0 THEN R=I: GOTO 1450 


< 102> 

2210 

IF I>N THEN PRINT X*(0) 

<022> 

1410 

NEXT I:GOTO 1520 


<044> 

2220 

J1=J2+1 

<244> 

1420 

: 


<126> 

2230 

J2=J1+W 

<236> 

1430 

REM*** PHASE 1 S(SPALTE) *** 


<211 > 

2240 

IF J2>=N THEN J2=N 

<248> 

1440 

: 


< 146> 

2250 

FOR 1=0 TO M-l 

<055> 

1450 

S=INT(RND(1 > *N)+1:T=T+1 


<097> 

2260 

PRINT:PRINT Y*(I); 

< 131 > 

1460 

IF T>100 THEN 2620 


<106> 

2270 

FOR J-Jl TO J2 

< 006 > 

1470 

IF A(R,S)>=0 THEN 1450 


<206> 

22B0 

A (I , J) =B (I , J ) 

<242> 

1480 

IF R< >0 THEN T=0:GOTO 1850 


< 194> 

2290 

Ad ,0) =B(1,0) 

<051 > 

1490 

8 


< 196> 

2300 

PRINT,""; : PRINT INT(A(I , J)*100+.5)/10 


1500 

REM *** PHASE 2 S(SPALTE) *** 


<033> 


0; 

<036> 

1510 

8 


<216> 

2310 

NEXT J 

< 116> 

1520 

S=0:R=0 


<067 > 

2320 

IF J>N THEN PRINT,"";:PRINT INT(A(1,0 


1530 

IF A (0,1X0 THEN S=1 


<203> 


)* 100+.5)7100 

<027> 

1540 

1550 

FOR J=2 TO N 

tc /wni t\\—ra no A/a 7 i \ t 

UCM ^• 1> f 


< 128> 
<070> 
<018> 

1570 

<200> 

2350 

-r tcN/A un mui 

GET A* 

1560 

S=J 


<170> 

2360 

IF A*=""THEN 2350 

<054> 

1570 

NEXT J 


< 138> 

2370 

NEXT 11 

<187> 

1580 

IF S>0 THEN 1710 


<251 > 

23B0 


<070> 

1590 

EE=1 


<210> 

2390 

IF El“l THEN GOSUB 2790 

<225> 

1600 

IF El=2 THEN GOSUB 2800 


< 193> 

2400 

GOTO 1070 

<022> 

1610 

PRINT 


<1B8> 

2410 

3 

<100> 

1620 

PRINT" **** RECHNUNG BEENDET ****" 


<236> 

2420 

REM *** MELDUNGEN *** 

<206> 

1630 

PRINT" ****I6SPACE>OPTIMUMI5SPACE > *** 


2430 

8 

<120> 


#" 


<014> 

2440 

PRINT:PRINT” *** RECHNUNG ABGEBROCHEN 


1640 

IF E1=0 THEN 1670 


<014> 


PHASE 0 ’ *#*•• 

<088> 

1650 

OPEN 4,4:PRINT#4:PRINT#4,CHR*(16) " 

11* 


2450 

PRINT" *** I3SPACE>LINEARKOMBINATION S 



*** RECHNUNG BEENDET ****" 


<166> 


PALTEN 1 3SPACE >***" 

<049> 

1660 

PRINT#4,CHR* ( 16 )" 11 **** {6SPACE >OPTIMU 


2460 

IF El =2 THEN GOSUB 2800 

<035> 


MT5SPACE >****" 5 PRINT#4:CLOSE 4 


< 197> 

2470 

IF E1=0 THEN END 

<216> 

1670 

GET A# 


<100> 

2480 

OPEN 4,4:PRINT#4 

<055> 

1680 

IF A*< >" " THEN 2070 


<060> 

2490 

PRINT #4 ,CHR*(16)"11 *** RECHNUNG ABGEB 


1690 

GOTO 1670 


<170> 


ROCKEN PHASE 0' ***" 

<164> 

1700 

S 


< 152> 

2500 

P91NT#4 , CHR* ( 16 )" 11*** C3SPACE>LINEARK 


1710 

REM *** PHASE 2 R(ZEILE) *** 


<007> 


OMBINATION SPALTENI3SPACE }***" 

<024> 

1720 

s 


< 172> 

2510 

PRINT#4:CLOSE 4:END 

<068> 

1730 

FOR 1=1 TO M—1 


<075> 

2520 

: 

<210> 

1740 

IF A(I,SX=0 THEN E ( I ) = 10T38: GOTO 

176 


2530 

PRINT:PRINT" *** RECHNUNG ABGEBROCHEN 



0 


<227> 


PHASE 0 ***" 

<053> 

1750 

E(I)=A(I,0)/A(I,S) 


<010> 

2540 

PRINT" *** I3SPACE1LINEARKOMBINATION Z 


1760 

NEXT I 


<064> 


EILEN (. 3SPACE ) *** " 

<043> 

1770 

IF E(l)>0 THEN R=1 : GOTO 1790 


<050> 

2550 

IF El =2 THEN GOSUB 2800 

<125> 

1780 

E(l) =10t38 


<236> 

2560 

IF E1=0 THEN END 

<052> 

1790 

FOR 1=2 TO M-l 


<167> 

2570 

OPEN 4 , 4:PRINT#4 

< 147> 

1800 

IF E (IX“0 OR Ed) >=E(I — 1 ) THEN 1820 

<020> 

2580 

PRINT#4,CHR*(I6)"11*** RECHNUNG ABGEB 


1810 

R=I : GDTO 1850 


<053> 


ftOCHEN PHASE 0 ***“ 

<066> 

1820 

NEXT I 


< 126> 

2590 

PRINT#4,CHR* ( 16) " 11 *** I3SPACE > LINEARK 


1830 

IF ROl THEN 2710 


< 105> 


0MBINATION ZEILEN{3SPACE>***" 

< 179> 

1B40 

: 


<038> 

2600 

PRINT#4:CLOSE 4:END 

< 160> 

1850 

REM *** UMRECHNUNG *** 


<206> 

2610 

| 

<046> 

1860 

3 


<05B> 

2620 

PRINT:PRINT" *** RECHNUNG ABGEBROCHEN 


1870 

ZW*-X*(S) : X* (S>=Y*(R) : Y*(R)“ZW* 


< 165> 


PHASE 1 ***" 

< 147> 

1880 

B(R,S)=1/A(R,S> 


<063> 

2630 

PRINT“ *** <3SPACE>KEINE ZULAEBSIGE LO 


1890 

8 


<088> 


ESUNG C3SPACE >***“ 

< 167> 

1900 

FOR J=0 TO N 


<083> 

2640 

IF El=2 THEN GOSUB 2800 

<217> 

1910 

IF J=S THEN 1930 


< 121 > 

2650 

IF E1=0 THEN END 

<142> 

1920 

1930 

B(R,J)-A(R,J)/A(R,S) 

NEXT J 


<206> 
<244 > 

Listlng 1. »Simplex 64«, ein Programm zur Optimierung 

1940 

1 


< 138> 

linearer Zusammenhänge 
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2660 OPEN 4,4:PRINT#4 <237> 

2670 PRINT#4,CHR*C16J"11*** RECHNUNG ABGEB 

ROCHEN PHASE 1 ***" <157> 

2680 PRINT#4,CHR$(16)"11***T3SPACE >KEINE Z 
ULAESSIGE LOESUNG C3SPACE >***":PRINT#4 
:CLOSE 4:END <002> 

2690 PRINT#4:CLOSE 4:END <250> 

2700 I <136> 

2710 PRINT:PRINT" *** RECHNUNG ABGEBROCHEN 

PHASE 2 ***" <239> 

2720 PRINT" *** C3SPACEJKEINE BEGRENZTE, LOE 

SUNG T4SPACE >***" <113> 

2730 IF El=2 THEN GOSUB 2B00 <051> 

2740 IF E1=0 THEN END <232> 

2750 OPEN 4 f 4:PRINT#4 <071> 

2760 PRINT#4,CHR*C16J"11*** RECHNUNG ABGEB 

ROCHEN PHASE 2 ***" <248> 

2770 PRINT#4,CHR*(16)"11***<3SPACE>KEINE B 
EGRENZTE LOESUNG{4SPACE>***":PRINT#4: 

CLOSE 4:END <099> 

2780 PRINT#4:CLOSE 4:END <084> 

2790 : <226> 

2800 REM *** DRUCKERAUSGABE *** <158> 

2810 : <246> 

2820 OPEN 4,4 <129> 

2B30 12=0:J1=0:J2=0 <147> 

2840 FOR 11=1 TO N STEP 4 <246> 

2850 PRINT#4,CHR*C10J <025> 

2860 PRINT#4,CHR*<16J"10*** SIMPLEX TABLEA 

U"IT".ITERATION ***" <069> 

2870 PRINT#4 <079> 

2880 12=11+3 <052> 

2890 IF I2>=N THEN I2=N <126> 

2900 Z=0 <107> 

2910 FOR 1=11 TO 12 <099> 

2920 Z=Z+1 <194> 

2930 ON Z GOSUB 3260,3270,3280,3290,3300 <011> 

2940 : <122> 

2950 NEXT I <240> 

2960 IF K=N THEN 2990 <030> 

2970 1=0:Z=Z+1 <022> 


2980 ON Z GOSUB 3260,3270,3280,3290,3300 <061> 

2990 J1=J2+1 <252> 

3000 J2=Jl+3 <208> 

3010 IF J2>=N THEN J2=N <000> 

3020 PRINT#4 <229> 

3030 FOR 1=0 TO M-l <073> 

3040 IF 1=0 THEN PRINT#4:PRINT#4,"<2SPACE> 

Z",:GOTO 3070 <128> 

3050 IF 1=1 THEN PRINT#4 <050> 

3060 PRINT#4:PRINT#4,Y*(IJ, <136> 

3070 Z=0 <021> 

3080 FOR J=J1 TO J2 <056> 

3090 IF IT=0 THEN 3120 <250> 

3100 A (I , J J =B(I,J) <046> 

3110 A<I,0)=B(1,0) <111> 

3120 Z=Z+1 <140> 

3130 ON Z GOSUB 3210,3220,3230,3240,3250 <219> 

3140 NEXT J <184> 

3150 IF J<=N THEN 31B0 <211> 

3160 J=0:Z=Z+1 <21B> 

3170 ON Z GOSUB 3210,3220,3230,3240,3250 <003> 

3180 NEXT I <216> 

3190 NEXT II <245> 

3200 PRINT#4:CLOSE 4:RETURN <010> 

3210 PRINT#4,CHR*<16)"13"INT(A(I,J)*100+.5 

)/100;:RETURN <144> 

3220 PRINT#4,CHR*<16J"26"INT CA(I,J)*100+. 5 

J/100;:RETURN <210> 

3230 PRINT#4,CHR#<16>"39"INT CA<I,J)*100+.5 

J/100J .-RETURN <020> 

3240 PRINT#4,CHR#C16)"52"INT CACI,J)*100+.5 

J/100;:RETURN <190> 

3250 PRINT#4,CHR*C16J"65"INT CACI,JJ*100+.5 

J/100;:RETURN <000> 

3260 PRINT#4,CHR*C16)"14"X*CIJ;:RETURN <03B> 

3270 PRINT#4,CHRt C16J"27"X* CIJ;:RETURN <104> 

3280 PRINT#4,CHR*C16J"40"X*(IJ;:RETURN <01B> 

3290 PRINT#4,CHR*C16J"53"X*CIJ;:RETURN <084> 

3300 PRINT#4,CHR*C16J"66"X*CI!;:RETURN <150> 


Listing 1. »Simplex 64« (Schluß) 


ni .Mi 


Polydat - Dateiverwaltung 
schnell und komfortabel 


Wer viel mit Daten, zum Beispiel Adressen, 
Bücher-, Software- und Autorenlisten oder ähnli¬ 
chem arbeitet, benötigt ein leistungsfähiges und 
komfortables Dateiverwaltungsprogramm. Mit 
»Polydat« wird universelle Datenverarbeitung zum 
reinsten Vergnügen. 

D ateiverwaltung ist eines der bekanntesten und belieb¬ 
testen Anwendungsgebiete eines Computers. Gibt es 
doch eine Menge Wissenswertes im Leben eines 
Menschen, das man sich merken muß und das jederzeit 
abrufbar sein soll. Und hier zeigt der Computer mit der ent¬ 
sprechenden Software seine wahre Stärke. Es wäre jedoch 
unnötiger Aufwand, wollte man für jede spezielle Anwen¬ 
dung ein eigenes Programm entwickeln. Wozu gibt es 
schließlich universelle Dateiverwaltungsprogramme? Uni¬ 
versell heißt, daß Sie, egal was immer Sie verwalten wollen 
- ob Adressen, Briefmarken-, Münzen- oder andere Samm¬ 
lungen - für alle Dinge ein und dasselbe Programm ver¬ 
wenden können. Die Ein- und Ausgabemaske kann also bei 
einem derartigen Programm ganz nach Belieben und 


Bedarf entworfen und geändert werden. Polydat (Listing 1 
und 2) ist ein solches universell einsetzbares Dateiverwal¬ 
tungsprogramm, das einen sehr schnellen Zugriff auf die 
gespeicherten Daten über ein frei wählbares Schlüsselfeld 
erlaubt. Sie können also selbst entscheiden, über welches 
Feld Ihrer Eingabemaske ein direkter Zugriff möglich sein 
soll. Die Suche nach anderen Feldern dauert natürlich 
etwas länger, da in diesem Fall auf der Diskette gesucht 
werden muß. 

Komfortable Menüsteuerung 


Das besonders interessante an Polydat ist, daß es sich 
nahezu selbst erklärt: Alle Funktionen des Programms sind 
als eindeutige Menüpunkte ausgewiesen und werden über 
entsprechende Tasten ausgeführt. Fehleingaben sind 
nahezu ausgeschlossen oder werden ignoriert. An jeder 
beliebigen Stelle kann mit <F2> ins Hauptmenü zurück¬ 
gekehrtwerden, ohne daß Daten verloren gehen (geöffnete 
Dateien werden geschlossen). Bei allen Eingaben besteht 
die Möglichkeit, den Cursor mit den Cursortasten innerhalb 


146 


SONDERHEFT 19 









C64 


ANWENDUNG 


des Eingabefeldes zu bewegen und die Eingabe mit den 
Tasten <INST> und <DEL> zu editieren. Mit <SHIFT' 
CLR/HOME> kann das gesamte Eingabefeld gelöscht 
werden. Unerlaubte Zeichen, wie zum Beispiel Steuerzei¬ 
chen für Farbänderungen, Bildschirmlöschen oder ähnli¬ 
ches werden einfach ignoriert. Es ist also ungeheuer 
schwer, Fehler zu machen. 

Das Hauptmenü beinhaltet sechs Punkte, die durch 
Druck auf die entsprechende Zifferntaste erreicht werden 
(Bild 1). Diese Menüpunkte sind hierarchisch aufgebaut, 
das heißt, die Reihenfolge der Menüpunkte entspricht Ihrer 
Vorgehensweise beim Arbeiten. Kommen wir nun zur 
Beschreibung der einzelnen Programmfunktionen. 

Datei einrichten 

Nach Aufruf dieses Menüpunktes wird abgefragt, ob eine 
bereits vorhandene Eingabemaske verwendet werden soll. 
Geben Sie hier »J« für Ja ein, werden Sie aufgefordert, den 
Namen dieser Maske einzugeben. Über eventuell auftre¬ 
tende Fehler beim Ladevorgang werden Sie vom Pro¬ 
gramm informiert. Falls keine fertige Maske verwendet wer¬ 
den soll, können Sie nun eine neue Eingabemaske erstel¬ 
len. Im Masken-Editor befindet sich der Computer im Groß-/ 
Kleinschrift-Modus, wobei der komplette Zeichensatz zur 
Verfügung steht. Zur Vereinfachung der Eingabe wurde die 
Repeatfunktion, die sonst nur von < SPACE > und den 
Cursortasten her bekannt ist, auf alle Tasten erweitert. Das 
Cursorblinken wurde zur besseren Orientierung abgestellt. 
Folgende Tasten sind im Editor mit Funktionen belegt: 

< Fl > Beenden der Editierfunktion 

<F2> Abbruch (Rücksprung ins Hauptmenü) 

<F3> Zeile löschen 
<F4> Zeile einfügen 

Eingabefelder werden bei Polydat mit < @ > gekenn¬ 
zeichnet. Für jede Stelle eines Eingabefeldes muß dieses 
Zeichen gesetzt werden, zum Beispiel: 

Name : @@@@@@@@@@@@@@@@@@@@@ 

Eine Datei darf maximal 30 Eingabefelder mit einer 
gesamten Feldlänge von 254 Zeichen besitzen. Über feh¬ 
lerhafte Eingaben bei der Maske wird der Anwender vom 
Programm informiert. 

Nach dem Laden oder dem Editieren einer Maske 
besteht nun die Möglichkeit, diese gegebenenfalls zu ver¬ 
ändern. Ist die Maske fertiggestellt, fragt das Programm 
nach dem Indexfeld. Als Indexfeld sollte das Eingabefeld 
gewählt werden, das später beim Suchen besonders häu¬ 
fig verwendet wird, da die Suche über ein Indexfeld beson¬ 
ders schnell durchgeführt werden kann. 

Danach werden Sie aufgefordert, eine Datendiskette ein¬ 
zulegen und eine Taste zu drücken. An dieser Stelle muß 
der neuen Datei ein Name gegeben werden, worauf die 
Maske und das Indexfeld gespeichert und eine relative 
Datei eingerichtet wird. Danach können Sie sofort mit der 
Dateneingabe beginnen. 

Daten eingeben 

In diesem Programmteil können Daten eingegeben und 
gespeichert werden. Nach der Eingabe erscheint die in 
Menüpunkt 1 editierte Eingabemaske auf dem Monitor. 
Dort werden kurz die wichtigsten Befehle angezeigt. Zur 
Eingabe sind folgende Funktionen vorgesehen: 

< RETURN > : Sprung ins nächste Eingabefeld 

<SHIFT RETURN > : Sprung ins vorhergehende Ein¬ 
gabefeld 

< Fl > : Beenden der Eingabe 

<F2> : Abbruch und Rücksprung zum 

Hauptmenü 

Nach Beenden der Eingabe mit < Fl > können weiterhin 
folgende Funktionen aufgerufen werden: 

<E> : Beenden der Dateneingabe und Schließen der 
Datei 


<A> : Ändern des angezeigten Datensatzes 
<F1 >: Eingabe weiterer Datensätze 
<F7> : In der Kommandozeile wird angezeigt, wie viele 
Datensätze bereits eingegeben wurden und wie 
viele noch eingegeben werden können 
Daten suchen 

Auch hier wird zuerst der Name der Datei eingegeben. 
Dann fragt das Programm, ob nach einzelnen Datensätzen 
oder ganzen Blöcken gesucht werden soll. Wird nach 
einem bestimmten Bereich gesucht, so besteht die Mög¬ 
lichkeit, sich alle Datensätze oder auch nur einzelne aus- 
drucken zu lassen. 

Nach der Eingabe des Suchkriteriums beginnt der Com¬ 
puter mit der Suche und gibt die gewünschten Datensätze 
je nach Wahl auf Bildschirm oder Drucker aus. Das Suchen 
nach einzelnen Datensätzen verläuft ähnlich. Allerdings 
wird das Suchen nach dem ersten gefundenen Datensatz 
unterbrochen. Hier können nun folgende Funktionen aus¬ 
geführt werden: 

<D> : Ausdruck des angezeigten Bildschirms 
<A> : Ändern des angezeigten Datensatzes 
< + >/ 

<-> : Anzeigen des nachfolgenden/vorhergehenden 
Datensatzes 

Nach Drücken einer anderen Taste sind folgende Unter¬ 
punkte erreichbar: 

<W> : Der Suchvorgang wird fortgesetzt 
<N> : Das Suchkriterium kann geändert werden 
< Fl >: Die Suche wird beendet 

Die Eingabe der Suchkriterien erfolgt in allen Eingabefel¬ 
dern gleich, jedoch ist die Suche nach Kriterien im Index¬ 
feld erheblich schneller. Eine Eingabe kann mit < * > abge¬ 
kürzt werden. Einzelne Zeichen können durch ein <?> 
ersetzt werden, wenn sie nicht bekannt oder für die Suche 
irrelevant sind. 

Druckerparameter 

Da die meisten Drucker im Textmodus gleich angesteu¬ 
ert werden, ist keine spezielle Anpassung für die Drucker¬ 
routine notwendig. In diesem Menüpunkt kann zwischen 
Normalschrift und Breitschrift gewählt werden. Da bei Nor¬ 
malschrift nur die Hälfte des Papiers ausgenutzt wird, kann 
hier weiterhin der Abstand vom linken Papierrand bestimmt 
werden. 

Falls die Druckerausgabe nicht funktionieren sollte, ver¬ 
wenden Sie bitte das Programm »Druckeranpassung« 
(Listing 3), mit dem die Geräteadresse, die Sekundär¬ 
adresse und der Steuercode für Breitschrift ins Programm 
»D2« eingebunden werden können. Voreingestellt sind 
Geräteadresse #4, Sekundäradresse #7 und #14 für 
Breitschrift einschalten. 


| HAUPTMENUE | 


( 

1 

> 

DATEI EINRICHTEN 

< 

2 

> 

DATEN EINGEBEN 

t 

3 

> 

DATEN SUCHEN 

< 

4 

) 

DRUCKERPARAMETER 

< 

5 

) 

DISKOPERATIONEN 

< 

6 

> 

PROGRAMM ENDE 


Bild 1. Das Hauptmenü von »Polydat« ist durch die Reihen¬ 
folge der einzelnen Menüpunkte logisch aufgebaut 
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Diskoperationen 

Die im folgenden aufgeführten Funktionen werden vom 
Programm ausführlich erklärt und benötigen keine weitere 
Beschreibung. 

< 1 > Directory (Inhaltsverzeichnis der Diskette) 

<2> Datei löschen 
<3> Datei umbenennen 
<4> Disk formatieren 
<5> Disk validieren 
<6> Hauptmenü 


Lediglich bei den Punkten »Datei löschen« und »Datei 
umbenennen« ist zu beachten, daß diese Befehle gleich¬ 
zeitig für die Masken-, Index- und Datenfiles gelten. Es wer¬ 
den also jeweils alle drei Dateien umbenannt oder 
gelöscht. Weiterhin sind von diesen Funktionen auch 
andere Programme betroffen, die den eingegebenen 
Dateinamen tragen. 

Sicher haben auch Sie bald eine Sammlung von Daten. 
Mit der unübersichtlichen Zettelwirtschaft ist dann aber 
endgültig Schluß. (C. Süßkind, M. Kereit/nj) 


70 REM ******************************** 

80 REM * INITIALISIEREN * 

70 REM ******************************** 

100 POKE 55,0:POKE 56,58:CLR 

110 PRINT"<CLR>":POKE 808,254 

120 VI=53248:POKE VI+32,6:P0KE VI+33,6 

130 FDR 1=0 TO 62:READ X:POKE 832+1,X 

140 NEXT I:POKE 2040,13:POKE VI,55 

150 POKE VI+1,175:POKE 657,128 

160 S<=" wwnimiuMmH» ' 1 

170 T«=B*+" **»*«♦«»»**«»*«» “ 

170 POKE 3,0:POKE 4,0 

200 PRINT CHR$(142)"{CLR,2D0WN,YELLOW >"TAB 
(7) "U"S*"JL": PRINT TAB (7) " = <4SPACE>P0LY 
DAT V2.0{4SPACE > 3 " 

210 PRINT TAB (7) "£"S*"K.": PRINT" {DOWN,SPACE 
>ü"T*" J.{2SPACEJ—"SPC <36) " 3 C2SPACE>={2S 
PACE>AUTOREN :"; 

220 PRINT SPC<25>"^{2SPACEJ = "SPC<36)" = <2SP 
ACE > = C8SPACE >CHRISTIAN SUESSKIND C7SPAC 
E> = " 

230 PRINT" = "SPC(36)“ = <2SPACE> = <8SPACE>MAT 
THIAS KEREIT <13SPACE > 3 {2SPACE> 3 "SPC(36 
) 

240 PRINT" £"T*"K.{D0WN,2SPACE>ü"T*"i." 

250 PRINT" 3"SPC(36>" = <2SPACE>^<8SPACE>C0P 
YRIGHT 1787{14SPACE >-{2SPACE > 3 "SPC < 36) 


< 120 > 

<075> 

< 140> 

< 220 > 

< 1 06> 
<001 > 

< 155> 

< 142> 

< 117> 

< 210 > 

< 113> 
<025> 
<034> 


< 101 > 


< 102 > 

<232> 

< 1 30> 
<252> 

S^SR 


= 

260 PRINT" = {BSPACE>BY MARKT S, TECHNIK <10S 
PACE)-{2SPACE3-"SPC<36)C2SPACE> &" T*" 
J!.C3UP>" 

270 POKE VI+21,1:IF PEEK(47152)=120 AND PE 
EK <47153) = 165 AND PEEK(47154>=1 THEN 3 
10 

280 SYS(57812)"D2",8:POKE 780,0:POKE 7B1,0 
:POKE 782,172:SYS 65473 
270 OPEN 15,8,15:INPUT#15,A,B*,C,D:CLOSE 1 
5:IF A=0 THEN 310 

300 PRINT"{2D0WN,6SPACE>BITTE PROSRAMMDISK 
EINLEGEN GOSUB 8100:GOTO 200 
310 GOSUB 8600:POKE VI+21,0 
370 ID=15000:DIM X(30),Y(30),L(30) 

380 PRINT"{CLR}":GOSUB 8700 
760 : 

770 REM ******************************* 

780 REM * HAUPT-MENUE * 

770 REM ******************************* 

800 SYS 52258 

810 GOSUB B100:A=ASC(A*)-48 
820 IF A<1 OR A>6 THEN 810 

830 GOSUB 8700:ON A GOTO 1000,2000,3000,40 
00,5000,6000 
760 : 

770 REM ******************************* 

780 REM * DATEI EINRICHTEN * 

770 REM ******************************* 
1000 A*="DATEI EINRICHTEN":GOSUB 7000:PRIN 
T"{DOWN,3SPACEJALTE MASKE VERWENDEN < 
J/N) ? 

1010 GOSUB 8200:IF A*="J"THEN 1700 

1015 GOSUB 8800:IF DN«>""THEN PRINT"{CLR> 


<244> 


<056> 


< 174> 
<225> 
<087> 

< 177> 
<234> 
<178> 

< 177> 
<22B> 

< 146 > 
<203> 

< 166> 

< 124> 

< 17B> 
<052> 

< 174> 
<174> 
<070> 

< 160> 
<110> 


<042> 

<027> 


" <061> 

1020 DN*="“:SYS 51171 <207> 

1030 KO*=" {6SPACE3 '£1 ' EXPE {5SPACE3 ' F2 ' 

-BKUCH {6SPACE3":GOSUB 7700 <153> 

1040 POKE 250,0:SYS 50052:IF PEEK(250)<>14 

7 THEN 1050 <112> 


1045 GOSUB 8100:IF A*="{CLR>"THEN PRINT A* 
1048 GOTO 1020 

1050 IF PEEK(250)=137 THEN GOSUB S700:GOTO 
7600 

1060 GOSUB 8700:SYS 47210:GOSUB 7210:IF AE 
AND AE<=30 AND RL<255 THEN 1400 
1070 IF AE=0 THEN KO«=" {5SPACE3 .KJLIK EIKGRB 
£££.U1 Y-PJWW1.EX ! (5SPACE>" 

1080 IF AE>30 THEN KO<=" {75PACF3 ZUV1ELE 
UGRJEFJ^Ljie.r ! {8SPACE3 “ 

1070 IF RL>254 THEN KQ$= " {10SPACE> DfVTENSflT 
i ZU -l-JIXG > t7SPACE>" 

1100 GOSUB 7700:GOSUB B100:GOTO 1030 
1400 A*="DATEI EINRICHTEN":GOSUB 7000 
1410 PRINT CHRS(142)"{DOWN,3SPACE>MASKE AE 
NDERN (J/N) ?":GOSUB 8200 
1420 IF A*="J"THEN GOSUB B800:GOTO 1030 
1500 IF AE=1 THEN ZA=l:GOTO 1530 
1510 PRINT"{DOWN,3BPACE3INDEXFELD (1"sOTR* 


(-AE) 5 ") :";:L=LEN(STR*(AE))-l 
1520 GOSUB 8300:IF ZA<1 OR ZA>AE OR A=133 
THEN PRINT"{3UP)":GOTO 1510 
1530 IN=ZA:POKE ID+1,IN:PRINT 
1540 PRINT"{3SPACEJDATENDISK EINLEGEN !{ 6 S 
PACE)>TASTE<":GOSUB 8100 
1560 PRINT"{UP,36SPACE,2UP>":OPEN 15,8,15: 

1570 ÖGL IB 7800:CLOSE 15:FB=FB-6 
.1680 IF A THEN GOSUB 8530: GOTO 1550 
1670 IF FB<0 THEN PRINT"{DOWN,3SPACE3DISKE 
TTE VOLL !{ 6 SPACE>>TASTE<{UP>":GOSUB 
8100:GOTO 1540 

1700 NE=1:POKE ID+4,1:P0KE ID+5,0 
1720 GOSUB 7300:DN*=NA* 

1730 SYS(57812)"M—"+DN$,B 
1740 SYS 52726:OPEN 15,8,15 
1750 INPUT#15,A,B#,C,D:IF A=0 THEN 1770 
1760 IF A< >63 THEN GOSUB. 8530: GOTO 1730 
1770 PRINT"{D0WN,3SPACE>DATEI BEREITS VORH 
ANDEN !":PRINT"{DOWN,3SPACE >UEBERSCHR 
EIBEN (J/N) ?" 

1780 GOSUB 8200:IF A*="N"THEN CLOSE 15:G0T 
0 1720 

1785 PRINT#15,"S:??"DN*:CLOSE 15:GOTO 1730 

1770 CLOSE 15:SYS(57812)"I—"+DN*,B 

1800 POKE 173,152:POKE 174,58 

1810 X=ID+7+3*AE+NU*(IL+2):POKE 175,X/256: 

POKE 174,X—256*PEEK(175):SYS 62757 
1820 GOSUB 8500:IF A THEN 1770 
1830 OPEN 1,8,2,"{2SPACE>"+DN*+",L,"+CHR*( 
RL) 

1840 CLOSE 1 

1860 PRINT"{DOWN,3SPACEJDATEN EINGEBEN (J/ 
N) ?":GOSUB 8200 

1870 IF A*="J"THEN GOSUB 7200:GOTO 2020 
1880 GOTO 800 

1700 PRINT"{DOWN,3SPACE>NAME DER MASKE 
1710 NA*=DN*:L=14:GOSUB 8400 
1720 SYS(57812)"M-"+NA*,8:POKE 7B0,0:POKE 
781,0:POKE 782,160:SYS 65473 
1730 GOSUB 8500:IF A THEN 1000 
1740 SYS 47210:AE=PEEK(ID):GOTO 1410 
1760 : 

1770 REM ****************************** 
1780 REM * DATEN EINGEBEN * 

1770 REM ****************************** 
2000 A*="DATEN EINGEBEN":GOSUB 7000:GOSUB 
7300 


<034> 

<036> 

<034> 

<035> 

< 144> 

< 158> 

<231 > 
<207> 
<046> 

<008> 

< 116> 
<077> 

<050> 

<057> 

< 137> 

< 138> 

< 170> 

< 114 > 

< 140> 


< 146> 
<006> 
<063> 

< 177> 

< 115> 

< 174> 

< 125> 


< 220 > 

<060> 
<236> 
< 182> 
<216> 

< 102 > 

<125> 

<246> 

<073> 

< 147> 
< 220 > 
<086> 

< 176> 
<175> 

<074> 

<070> 

< 170> 

< 15B> 
<246> 
<217> 
< 010 > 

<006> 


Listing 1. Basic-Hauptprogramm »Polydat«. Bitte beachten Sie die Eingabehinweise auf Seite 159. 
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2010 

2020 

2100 

2105 

2110 

2112 

2115 

2120 

2125 

2130 

2140 

2300 

2310 

2400 

2410 

2420 

2430 

2440 

2450 

2460 

2470 

2480 

2500 

2510 

2700 

2710 

2720 

2730 

2740 

2800 

2960 

2970 

2980 

2990 

3000 

3010 

3020 


3021 

3022 

3023 

3024 

3025 
3030 

3040 

3100 

3110 

3120 

3130 

3140 

3200 

3210 

3220 

3300 

3310 

3320 

3330 

3400 

3410 

3420 

3430 

3440 

3450 

3500 


GOSUB 9100:IF A THEN 2000 <122> 

AL=NE:OPEN 15,8,15:GOSUB 9800 <226> 

CLOSE 15:FB=INT(252*FB/RL>:FB=INT(FB/ 

(l+IL/254)) <122> 

IF FB<1 THEN GOSUB BB00:GOTO 2460 <229> 

OPEN 1,8,2,"<2SPACE>"+DN*:GOSUB 8510 <031> 

IF A THEN CLOSE 1:GOTO 2000 <176> 

GOSUB 8800 <223> 

X=INT(NE/256>:Y=NE-256*X:PRINT#15,“P" 

+CHR*(2)+CHR* < Y)+CHR* (X > +CHR#(1> <196> 

INPUT#15,A,B*,C,D <212> 

KO*=" '£1' E.MDÄ DER E.IXGRJ_E. t2SPACE> 'F 

2- .KBB.R.UCH. {2SPACE > " : I = 1 <026> 

GOSUB 9700-.GOSUB 9510:SYS 49979 <196> 

IE=2:X=ID+6+3*AE+ <NE—1)*(IL+2): POKE X 
+1,NE/256:POKE X,NE-256*PEEK(X+l> <015> 

FOR 1=1 TO L(IN):POKE X+l+I,PEEK<1023 
+40*Y(IN)+X(IN)+1):NEXT I:NE=NE+1 <002> 

KO*=" •£• £H££<2SPACE>-a - fl£fla£Rfl<2SP 
ACE> '£1 ' .E_I_KGE_B_E_K ": GOSUB 9700 <225> 

GOSUB 8100:IF A#="A"THEN NE=NE-1:IE=3 
:GOTO 2120 <146> 

IF A*="E"THEN 2500 <107> 

IF A*="{F7>"THEN CLOSE 1:CLOSE 15:G0S 
UB 9900:GOSUB 2800:GOTO 2400 <145> 

IF A*<> " <F 1 > "THEN 2410 <116> 

FB=FB-1:IF FB>0 THEN 2120 <066> 

CLOSE 1:CLOSE 15 <0B6> 

KO*=" E.K.D.E. £££ ELIKG.KAE ! (35PACE> ALS.K.£ 

II£ V.O.L.L. | ": GOSUB 9700 <158> 

IF IE=0 THEN GOSUB 8100:GOTO 800 <093> 

POKE ID+5,NE/256:POKE ID+4,NE-256*PEE 
K(ID+5):IF NE=AL THEN 2700 <151> 

POKE 248,AL/256:POKE 247,AL-256*PEEK( 

248):POKE 1B9,IL+2:SYS 49514 <080> 

CLOSE 1:CLOSE 15 <072> 

OPEN 1,8,15,"S:I-”+DN*:CLOSE 1 <131> 

SYS < 57812)"I —“ +DN*,B:POKE 193,152 <037> 

POKE 194,58:X=ID+7+3*AE+NE*(IL+2) <205> 

POKE 175,X/256:POKE 174,X-256*PEEK(17 
5):SYS 62957:IE=0:GOTO 800 <155> 

OPEN 1,8,2,"C2SPACE>"+DN#:GOTO 8510 <209> 


6 < 142> 


REM ****************************** 

REM * DATEN SUCHEN * 

REM ****************************** 

GF=0:IE=0:A*="DATEN SUCHEN":GOSUB 900 
0:GOSUB 9300 

GOSUB 9100:IFA THEN 3000 
IF NE=1 THEN PRINT"CD0WN.3SPACEJKEINE 
DATEN VORHANDEN !":GOSUB 8100:GOTO 8 
00 

PRINT"<D0WN,3SPACE>BEREICH ODER EINZE 
LN SUCHEN <B/E) ?" 

GOSUB 8100:IF A*< >“B“AND A*<>"E"THEN 
3022 

SU#=A*:IF SU*=“E"THEN 3025 
PRINT"(DOWN,3SPACE>VOLLSTAENDIG AUSDR 
UCKEN <J/N> ?":GOSUB 8200:AD#=A* 

OPEN 1,8,2,"C2SPACE>"+DN*:OPEN 2,8,15 <004> 
KO#=" ' £1 ' T-KD.E. HER XIXGAB£ <2SPACE> '£ 

2' naaR.U.ClU 2SPACE>" 

GOSUB 9500:GOSUB B900:T=0:W=0 
FOR J=1 TO AE:1=0:FOR K=0 TO L<J)-1 
IF PEEK <1024+X(J)+40*Y ( J)+K)< >32 THEN 
1=1:W=W—(J<>IN):K=L(J>-1 
NEXT K:POKE 51725+J,I:NEXT J 
I=PEEK(51725+IN) 

IF 1=0 THEN AN=1:E=NE—1:GOTO 3300 
SYS 51205:IF PEEK(248)=0 THEN 3800 
AN=256*PEEK(250> +PEEK(249 > 

E=256*PEEK(252)+PEEK(251) 

IF SU#= "E"THEN 3330 
IF AN>E AND GF=1 THEN 3750 
IF AN>E THEN 3800 

GOSUB 8800:GOSUB 9700:AZ=AN:IF W=0 TH 
EN 3500 

I = I D+6+3*AE+ (IL+2) * (AN-1) 

LO=PEEK(I>:HI=PEEK(1 + 1):PRINT#2,"P"+C 
HR*(2)+CHR*(LO)+CHR#(HI> +CHR#(1) 

SYS 51761:AZ=AN 

IF PEEK(248)=0 AND AN=E AND (SU#="E" 

OR GF=0) THEN 3800 
IF PEEK(248)=0 AND AN=E THEN 3750 
IF PEEK(248)=0 THEN AN=AN+l:GOTO 3400 <008> 
GF=1:I=ID+6+3*AE+(IL+2)*(AN-l> <023> 


<230> 

<163> 

<250> 

<108> 
< 114> 


< 111 > 


<030> 


<247> 

<103> 


< 153> 


< 129> 
<042> 

< 137> 

<078> 

<152> 

< 141 > 

< 179> 

< 128 > 

< 127> 
<083> 

< 191 > 
<029> 

< 106> 

<241 > 
<201 > 

< 178> 
<07B> 

< 103> 
<074> 


3510 LO=PEEK(I):HI=PEEK(I+1>:PRINT#2,"P"+C 

HR#(2)+CHR*(LO)+CHR*(HI)+CHR*(1) <022> 

3520 SYS 49906:AN=AN+1 <127> 

3521 IF SU*="E"THEN 3530 <190> 

3523 KO#=" <2SPACE> ■£' BRUCKEKK 2SPACE) ' TR5T 
£• <2SPACE>WEITERSUCHEN<2SPACE>":IF AD 

*="J"THEN 3525 <05B> 

3524 GOSUB 9700:GOSUB 8100:IF A*< >"D"THEN 

3300 <076> 

3525 GOSUB 9700:SYS 50843:IF PEEK(2)=0 THE 

N SYS 49376:GOTO 3300 <180> 

3526 CLOSE 1:CLOSE 2 <046> 

3527 OK*=KO*: KQ«=" {3SPACE1 .DR.UCK_ER E.I.H.5 C.HAl 
TEM ! 14SPACE > > .T-H_ST_E.< C3SPACE>" : GOSUB 9 

700:KO*=OK* <199> 

3528 SYS 50843:IF PEEK(2)<>0 THEN GOSUB Bl 

00:GOTO 3528 <237> 

3529 GOSUB 9700:SYS 49376:OPEN 1,8,2,"<2SP 

ACE>"+DN*:OPEN 2,8,15:G0T0 3300 - <050> 

3530 KO*=" -fl-D. R UC.RC- K 'fl '*/-m 

TTEAK ": GOSUB 9700 <142> 

3540 GOSUB 8100:IF A#< >"D“THEN 3550 <111> 

3545 SYS 50843:IF PEEK(2)=0 THEN SYS 49376 

:GOTO 3530 <014> 

3546 CLOSE 1:CLOSE 2:K0*=" ARUCKE.R E_I.NSC.H_fl 

m • '£1' R_UE.C_M.EKR ": GOSUB 9700 <092> 

3547 GOSUB 8100:IF A*="<F1>"THEN OPEN 1,8, 

2," C2SPACE>"+DN*:OPEN 2,8,15:GOTO 353 

0 <107> 

3548 SYS 50B43: IF PEEK (2)00 THEN 3547 <143> 

3549 SYS 49376:OPEN 1,8,2,"<2SPACE>"+DN#:O 

PEN 2,8,15:GOTO 3530 <242> 

3550 IF A*=" + "AND AN< >NE THEN 3500 <232> 

3551 IF A*=" —"AND AN< >2 THEN AN=AN-2:G0T0 

3500 <169> 

3552 IF A*="+"OR A#="-"THEN 3540 <224> 

3554 IF A#<>"A"THEN AN=AZ:GOTO 3600 <032> 

3555 K0*=" '£1' .E.NAE ■£I_N.G_KB.E {2SPACE> 'E. 

2' flSSflü£flC2SPACE5" <146> 

3560 IE=1:1=1:GOSUB 9700:GOSUB 9510:PRINT# 

2,"P"+CHR*(2)+CHR*(LO)+CHR*(HI> +CHR*( 

1) <043> 

35/ki I = ID+6+3*AE: X=I+ (NE-1 > * (IL+2) : Y=I+ (AN 

-2)*(IL+2):FOR J=2 TO IL+1 <233> 

3575 POKE Y+J,PEEK(1022+40*Y(IN)+X(IN)+J): 

NEXT J:FOR J=0 TO IL+1 <067> 

3580 POKE X+J,PEEK(Y+J):NEXT J:FOR J=Y TO 

X:POKE J,PEEK(J+IL+2):NEXT J <161> 

3590 POKE 248,(NE-1)/256:POKE 247,NE-1-256 

•PEEK(248):POKE 1B9,IL+2:SYS 49514 <043> 

3595 SYS 49979:GOTO 3530 . <096> 

3600 AN=AN+1: IF AN<=E THEN K0#=" 'H' MA1TJLR 
<2SPACE> - li' KE_U_ 5.U_C_KE_K <2SPACE 3 '.F.l ' £H 

":GOTO 3710 <169> 

3700 K0*=" <6SPACE> - fl - flEAL SUC.KE-K <3SPACE> ' £ 

1- JÜLQE (6SPACE>" <031> 

3710 GOSUB 9700:GOSUB 8100 <12B> 

3720 IF A*="W"AND AN<=E THEN 3300 <046> 

3730 IF A*="N"THEN 3030 <036> 

3740 IF A*< >"<F1>"THEN 3710 <202> 

3750 CLOSE 1:CLOSE 2:IF IE THEN 2710 <009> 

3760 GOTO 800 <18B> 

3800 KQ*=" <2SPACE>7iflX£fl5AT£ flLEflX £flflüflü2£ 

KE2SPACE>> TA_5_TE.< t2SPACE>" <046> 

3810 GOSUB 9700:GOSUB 8100 <228> 

3820 IF SU*="E"THEN 3700 <171> 

3830 GOTO 3750 <246> 

3960 : <126> 

3970 REM ****************************** <214> 

3980 REM * DRUCKERPARAMETER * <231> 

3990 REM ****************************** <234> 

4000 A*="DRUCKERPARAMETER":GOSUB 9000 <127> 

4010 PRINT"(DOWN,3SPACEJBREITSCHRIFT (J/N) 

?":GOSUB 8200:D#=A*:IF D#="J"THEN 40 
40 <131> 

4020 PRINT"<DOWN,3SPACE>TABWERT (0-40) :<2 

SPACE,2LEFT >"; <079> 

4030 L=2:GOSUB 8300:POKE 4,ZA:IF ZA<0 OR Z 

A>40 THEN PRINT"C3UPJ":GOTO 4020 <20B> 

4040 POKE 3,0:IF D*=“J"THEN POKE 3,1 <074> 

4050 GOTO 800 <224> 

4960 : <110> 

4970 REM ****************************** <198> 

4980 REM * DISKOPERATIONEN * <158> 

4990 REM ****************************** <218> 

5000 SYS 52261 <095> 
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5010 

5020 

5030 

5100 

5110 

5120 

5130 

5140 

5150 

5160 

5170 

5180 

5190 

5300 

5310 

5320 

5330 

5340 

5400 

5410 

5420 

5430 

5440 

5450 

5460 

5470 

5480 

5490 

5500 

5510 

5520 

5530 

5540 

5550 

5560 

5570 

5600 

5800 

5960 

5970 

5980 

5990 

6000 

6010 

6020 

7960 

7970 

7980 

7990 

8000 

8010 

8090 

B100 

8110 

8120 

8130 

8190 

8200 

8210 

8220 

8290 

8300 

8310 

8320 

8390 

8400 

8410 

8420 

8430 

8440 

8450 


GOSUB 8100:A=ASC < A* >-48 

IF A<1 OR A>6 THEN 5010 

GOSUB 8700:ON A GOTO 5100,5300,5400,5 

500,5600,800 

A*="DIRECTORY":GOSUB 9000:OPEN 1,8,0, 
"*0" 

GET#1,A*,B*:GOSUB B510:IF A THEN CLOS 
E 15:GOTO 5800 

A*="DIRECTORY":GOSUB 9000:FOR 1=1 TO 
16 

SYS 49753:IF ST THEN 5180 
GET A*:IF A*="(F2>"THEN 9600 
IF A*="<F1>"THEN CLOSE 15:GOTO 5800 
NEXT I:IF ST THEN 5180 
PRINT:PRINT:GOSUB 8600:GOTO 5120 
PRINT"<RVSON>BLOCKS FREE <DOWN >":CLOSE 
15 

GOSUB 8600:GOTO 5800 

A*="DATEI LOESCHEN":GOSUB 9000:F=44:L 
= 14 

PRINT"CD0WN,3SPACE>NAME DER DATEI 

NA*="":GOSUB 8400 

OPEN 1,8,15,"S:??"+NA* +","+NA* 

GOTO 5800 

A*="DATEI UMBtiNENNEN":GOSUB 9000:PRIN 
T"<D0WN,3SPACE>ALTER NAME 
L=14:NA*=DN*:GOSUB B400:MA*=NA* 

PRINT:PRINT"(3SPACE>NEUER NAME :"s 
L=14:NA*="":GOSUB 8400:IF NA*=MA* THE 
N 5000 

OPEN 1,8,15,"R:M-"+NA*+"=M-"+MA* 
PRINT#1,"R:I-"+NA*+"=I-"+MA* 

PRINT#1,"R: C2SPACE>"+NA*+"= <2SPACE >" + 
MA* 

PRINT#1,"R:"+NA*+"="+MA*:CLOSE 1 
OPEN 1,8,15:INPUT#1,A,B*,C,D 
CLOSE 1:DN*=NA*:GOTO 5000 
A*="DISK FORMATIEREN":GOSUB 9000 
PRINT"(DOWN,3SPACE>DISKETTENNAME : 

L=16:NA*="":GOSUB 8400 

PRINT"{DOWN,3SPACEJDISKETTEN ID :";:M 

A*=NA* 

L=2:NA*="":GOSUB 8400 

OPEN 1,8,15:PRINT#1,"M-W"CHR*(81> CHR* 
(0>CHR*(1)CHR*(255):CLOSE 1 
OPEN 1,8,15,"N:"+MA*+","+NA* 

PRINT;:GOTO 5800 
OPEN 1,8,15,"V" 

CLOSE 1:GOSUB 8500:GOTO 5000 

REM ****************************** 

REM * PROGRAMM ENDE * 

REM ****************************** 
PRINT TAB(12)"<DOWN>SICHER (J/N) ?“; 
GOSUB 8200:IF A*="N"THEN 800 
SYS 58236 
: 

REM ****************************** 

REM * ALLGEMEINE UNTERROUTINEN * 

REM ****************************** 
POKE 211,X:POKE 214,Y:SYS 58640 
RETURN 

POKE 198,0 

GET A*:IF A*=""THEN Bl 10 
IF A*="tF2>"THEN 9600 
RETURN 

GOSUB 8100 

IF A*<>"J"AND AtO"N“THEN 8200 
RETURN 

FOR 1=1 TO L:POKE 256+1,0:NEXT I 
F=1:POKE 250,L:SYS 50877 
GOSUB 8420:ZA=VAL(NA*):RETURN 

FOR 1=1 TO L:POKE 256+1,ASC(MID*(NA*, 
1,1)+CHR*(0)):NEXT I 
F=0:POKE 250,L:SYS 508B5 
IF PEEK(250)=137 THEN 9600 
X=1024+PEEK(211)+40*PEEK(214) 

NA*="":FOR 1=1 TO L:Y=PEEK(X+I) 
Y=Y-64*(Y<32 OR Y>95)-32*<Y>63 AND Y< 
96):NA*=NA*+CHR*(Y>:NEXT I 


<07B> 

< 192> 

<234> 

< 012 > 

< 197> 

<035> 

< 164> 
<067> 
< 202 > 
<079> 
<234> 

<240> 

<07B> 

<009> 
<226> 
• 067 > 

< 104> 

< 104 > 

<155> 

< 148> 

<252> 

<174> 

<152> 

<184> 

< 143> 

<160> 

< 141 > 

< 180> 
<080> 
<0B6> 
< 174> 


'5> 

< 12B> 
<183> 
<24B> 

< 102 > 
<028> 
<094> 
< 182> 
<076> 
< 202 > 
<206> 

< 193> 

< 133> 
<062> 
<150> 
<004 > 

< 170> 

< 180> 

< 194 > 
<192> 
<134> 
<062> 
,<033> 
<05B> 
<036> 
<149> 
<031 > 
<057> 
<214> 
<218> 
<246> 
<254> 
<05B> 

< 212 > 

<079> 

< 191 > 

< 186> 
<247> 

<052> 


*,LEN(NA*)—1):GOTO 8460 
8470 IF NA*<>""OR F THEN PRINT:RETURN 
8480 GOTO 8410 
8490 : 

8500 GOSUB 8510:CLOSE 15:RETURN 
8510 OPEN 15,8,15:INPUT#15,A,B*,C,D 
8520 IF A=0 THEN RETURN 
8530 POKE 250,A:SYS 51927:A=PEEK(250) 

8540 PRINT:IF A THEN PRINT" C2SPACE VA; B*; C 
5D 

8550 CLOSE 15:A=1 
8590 : 

8600 PRINT TAB(30)">RETURN<":IF ID THEN 81 
00 

8610 GET A*:IF A*="“THEN 8610 
8620 RETURN 
8690 : 

8700 X=(4+2*A)*40+1136 
8710 FOR 1=13 TO 1 STEP -1 
B720 POKE X—27+1,PEEK(X—27+1) OR 128 
8730 POKE X—I,PEEK(X—I) OR 128:NEXT I 
8740 FOR 1=0 TO 100:NEXT I:RETURN 
8790 : 

8B00 POKE 49166,160:POKE 49170,4 
8810 PRINT CHR*(14);:SYS 49152:RETURN 
8B90 : 

8900 POKE 49166,4:POKE 49170,160 
8910 GOTO 8810 
8990 : 

9000 PRINT"<CLR,3D0WN>"TAB(20-LEN <A*>/2>;A 
*:PRINT TAB <20-LEN(A*)/2);LEFT*(U*,LE 
N(A*> ) 

9010 PRINT CHR*(142);:SYS 51171:RETURN 
9090 : 

9100 A=0:IF NA*=DN* THEN 9200 
9110 SYS(57812)"M-"+NA*,8:POKE 780,0:POKE 
781,0:POKE 782,160:SYS 65493 
9120 GOSUB 8500:IF A THEN RETURN 
9130 SYS(57812)"I-"+NA*,8:POKE 780,0:POKE 
781,152:POKE 782,5B:SYS 65493 
9140 GOSUB 8500:IF A THEN RETURN 



9200 SYS 49334 

9210 AE=PEEK(ID):IN=PEEK(ID+1) 

9220 IF AE>30 THEN RETURN 

9240 NE=PEEK (ID+4 > +256*PEEK (ID+5) 

9250 FOR 1 = 1 TO AE:X=ID+3+3*I:L(I> =PEEK(X) 

:X(I)=PEEK(X + 1):Y(I> =PEEK(X+2):NEXT I 
9260 RL=0:FOR 1=1 TO AE:RL=RL+L(I):NEXT 
9270 IL=L(IN):RETURN 
9290 : 

9300 PRINT"<DOWN,3SPACE>NAME DER DATEI :"; 
: L=14 

9310 F=42:NA*=DN*:GOSUB 8400:RETURN 
9490 : 

9500 1=1:GOSUB 8800:GOSUB 9700 
9510 X=X(I>:Y=Y(I):GOSUB 8000 
9520 X=1024+40*Y+X 

9530 POKE 252,X7256:POKE 251,X-256*PEEK(25 
2):POKE 253,L(I>:POKE 254,1 
9540 POKE 250,0:SYS 50625:I=PEEK(254) 

9550 IF PEEK(250)=133 THEN RETURN 
9560 IF PEEK(250)=137 THEN 9600 
9570 IF I<1 THEN I=AE 
9580 IF I>AE THEN 1=1 
9590 GOTO 9510 

9599 : 

9600 CLOSE 1:CLOSE 2:CLOSE 15 

9610 SYS 50821:IF IE=3 THEN NE=NE+l:GOTO 2 
500 

9620 IF IE=2 THEN 2500 
9630 IF IE=1 THEN 2710 
9640 GOTO 800 
9690 : 

9700 X=1:Y=24:GOSUB 8000: PRINT" {RVSONV ; KO 
*;"<RVOFF >";:POKE 2023,32:RETURN 
9790 : 

9800 PRINT#15,"I":SYS 52182:FB=PEEK(250)+2 
56*PEEK(251) 

9810 INPUT#15,A,B*,C,D:RETURN 
9890 : 

9900 OPEN 15,8,15:GOSUB 9800:FB=INT(252*FB 
/RL>:FB=INT(FB/(l+IL/254)):CLOSE 15 


<219> 

<048> 

<206> 

<084> 

< 158> 
<249> 
<035> 

< 121 > 

< 136> 
<039> 

< 184> 

<086> 

< 119> 
<040> 
<028> 
<04B> 
<196> 

< 112 > 

< 170> 
<180> 

< 130> 
<044> 
<219> 
<230> 
<241 > 

< 174> 
<076> 


< 175> 
<164> 
<176> 
<115> 

< 152> 

< 126> 

<252> 
<146> 
< 118> 
< 020 > 
<04B> 
<252> 
< 182 > 

< 147 > 

<064> 

<140> 

<099> 

< 122 > 

<060> 
<024> 
<068> 
<054 > 

< 169> 

< 102 > 

<023> 

<060> 

< 190> 
<094> 
<091 > 
<007 > 
<052> 
<177> 
< 011 > 

< 114> 
<060> 
<014> 
<226> 
< 012 > 

<057> 

< 114> 

<068> 

<234> 

<214> 

< 103> 


8460 IF RIGHT*(NA*,1>=" "THEN NA*=LEFT*(NA 


9910 KO*=" 0000 .F.R.E.I.E. , 0000 BELEGT.E ,n.H_T£H5. 
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ANWENDUNG 


BEIZE ":IF FB>9999 THEN FB=9999 <179> 
9920 X=NE:IF NE>9999 THEN X=9999 <071> 
9930 A*=RIGHT*(STR*(FB) ,LEN(STR*(FB> )-1>:B 

*=RIGHT*(STR*(X-1) ,LEN <STR*(X—1))—1) <065> 
9940 K0*=LEFT*(K0*,5-LEN(A*>)+A*+MID*(KO*, 

6,12-LEN<B*))+B*+RIGHT*(K0*,21> <046> 
9950 GOSUB 9700sGOSUB 8100:RETURN <250> 
9960 : <028> 
9970 REM *■*•»*»*#«•*■***********«*•****##** <116> 
9980 REM * DATAS * <159> 
9990 REM ****************************** <138> 


10000 DATA 000,000,000,015,255,240,031,255 

,248,056,000,028,049,129,140,051 <076> 

10010 DATA 195,204,049,129,140,048,000,012 

,051,000,204,049,000,140,048,255 <176 > 

10020 DATA 012,056,000,012,031,255,248,015 

,255,240,000,000,000,015,255,240 <111> 

10030 DATA 022,102,104,043,102,212,086,102 

,106,127,255,254,000,000,000 <125> 


Listing 1. »Polydat« (Schluß) 


Name 

: 

d2 






cOOO ceeO 

c270 

3 

38 

20 

49 

bc 

a9 

Od 

20 

d2 

cb 

C4f0 

3 

02 

e6 

fc 

a5 

fc 

c9 

07 

dO 

35 

— 










c278 

3 

ff 

a9 

20 

a2 

05 

20 

d2 

ff 

45 

c4f 8 

: 

db 

a5 

fb 

c9 

cO 

dO 

d5 

a9 

lb 

cOOO 

3 

78 

a5 

01 

29 

fe 

85 

01 

aO 

12 

c2B0 

3 

ca 

dO 

f a 

20 

dd 

bd 

aO 

01 

c5 

C500 

s 

20 

aO 

27 

91 

f 9 

88 

10 

fb 

88 

cOOB 


00 

B4 

fb 

84 

fd 

a2 

aO 

B6 

5e 

c288 


b9 

00 

01 

fO 

06 

20 

d2 

ff 

4c 

c508 

: 

c6 

fd 

4c 

94 

c3 

c9 

8a 

dO 

c9 

cOlO 

3 

fc 

a2 

04 

86 

fe 

a2 

1B 

aO 

d6 

C290 

3 

c8 

dO 

f 5 

a9 

Oa 

38 

e5 

d3 

14 

c510 

3 

60 

20 

ab 

c5 

a9 

00 

85 

fb 

cc 

cOlB 

3 

27 

bl 

fb 

91 

fd 

88 

10 

f 9 

al 

c298 

3 

aa 

a9 

20 

20 

d2 

ff 

ca 

dO 

ld 

c518 

: 

a? 

04 

85 

fc 

aO 

16 

18 

a5 

2b 

c020 

3 

1B 

a5 

fb 

69 

28 

85 

fb 

85 

eO 

c2a0 

3 

fa 

20 

e4 

ff 

a4 

90 

dO 

46 

B2 

c520 

3 

fb 

69 

28 

85 

fb 

90 

02 

eh 

a5 

c028 

3 

fd 

90 

04 

e6 

f c 

e6 

fe 

ca 

e4 

c2a8 

3 

c9 

22 

dO 

f 5 

20 

e4 

ff 

c9 

32 

C528 

3 

fc 

8B 

dO 

f 2 

18 

a5 

fb 

69 

6c 

c030 

8 

dO 

e5 

a5 

01 

09 

01 

85 

01 

2d 

c2b0 

3 

22 

fO 

06 

20 

d2 

ff 

4c 

ac 

88 

cS30 

3 

29 

85 

f 9 

a5 

fc 

69 

00 

85 

74 

c03B 

8 

58 

60 

78 

a5 

01 

29 

1,7' 

85 

f 3 

c2bB 

3 

c2 

a9 

le 

38 

e5 

d3 

aa 

a9 

d8 

C538 

: 

f a 

a5 

f d 

c9 

17 

fO 

26 

a2 

94 

c040 

3 

01 

a2 

00 

B6 

fd 

a9 

3a 

85 

84 

c2c0 

3 

20 

20 

d2 

ff 

ca 

dO 

f a 

20 

04 

c540 

3 

17 

aO 

27 

bl 

fb 

91 

f 9 

B8 

ed 

c048 

3 

f e 

8a 

a8 

91 

fd 

cB 

dO 

fb 

49 

c2cB 

3 

e4 

ff 

c9 

20 

fO 

f 9 

aO 

00 

84 

C548 

3 

10 

f 9 

38 

a5 

f 9 

e9 

28 

85 

b2 

cOSO 

3 

eh 

fe 

a5 

fe 

c9 

aO 

dO 

f 3 

cb 

c2d0 

3 

20 

d2 

ff 

20 

e4 

ff 

fO 

Oa 

83 

c550 


f 9 

bO 

02 

c6 

fa 

38 

a5 

fb 

fb 

c058 


a9 

9d 

85 

f 8 

a9 

3a 

85 

f 9 

c7 

c2d8 

: 

c8 

cO 

05 

dO 

f 3 

20 

e4 

ff 

2f 

c558 

3 

e9 

28 

85 

fb 

bO 

02 

c6 

fc 

66 

c060 

3 

a9 

aO 

85 

fe 

aO 

00 

bl 

fd 

67 

c2e0 

3 

dO 

fb 

cO 

05 

bO 

08 

c8 

a9 

40 

c560 

3 

ca 

e4 

fd 

dO 

de 

a9 

20 

aO 

13 

c068 

8 

dO 

2f 

ee 

98 

3a 

a9 

00 

85 

9a 

c2e8 

3 

20 

20 

d2 

ff 

dO 

f 4 

20 

cc 

9c 

c568 

3 

27 

91 

f 9 

88 

10 

fb 

4c 

94 

22 

c070 

3 

f a 

84 

fb 

86 

fc 

e6 

fa 

c8 

00 

c2f 0 

3 

ff 

60 

a2 

01 

20 

c6 

ff 

a9 

74 

c570 

3 

c3 

c9 

20 

bO 

03 

4c 

d6 

c3 

ab 

c07B 

3 

cO 

28 

fO 

04 

bl 

fd 

fO 

f 5 

c4 

c2f 8 

3 

00 

B5 

f e 

18 

a5 

fe 

65 

fe 

63 

c57B 

3 

c9 

ea 

bO 

f 9 

20 

88 

c5 

aO 

cO 

c080 

3 

98 

48 

aO 

03 

b9 

f 9 

00 

91 

53 

c300 

3 

65 

fe 

aa 

18 

a9 

00 

7d 

9f 

62 

c580 


00 

91 

fb 

e6 

fe 

4c 

94 

c3 

51 

C088 

3 

fB 

B8 

dO 

f 8 

18 

a5 

fB 

69 

7d 

c308 

3 

3a 

85 

fb 

a9 

04 

85 

fc 

aO 

da 

c588 

3 

c9 

60 

90 

04 

c9 

aO 

90 

e5 

d6 

c090 

3 

03 

85 

f 8 

dO 

02 

eh 

f 9 

68 

be 

c310 

3 

28 

1B 

a5 

fb 

7d 

aO 

3a 

B5 

f e 

c590 

3 

c9 

40 

90 

04 

c9 

60 

90 

08 

10 

c098 

8 

aB 

CB 

cO 

28 

90 

c8 

18 

aS 

d4 

c318 

3 

fb 

90 

02 

e6 

fc 

88 

dO 

fl 

f 4 

c598 

3 

c9 

aO 

90 

07 

c9 

cO 

bO 

03 

22 

cOaO 

t 

fd 

69 

20 

05 

fd 

90 

02 

o6> 

47 

c320 

3 

*o 

oo 

20 

«4 

ff 

91 

fb 

C0 

73 

c5aO 

* 

30 

o9 

40 

c9 

cO 

90 

03 

30 

23 

cOaB 

8 

fe 

eB 

eO 

18 

dO 

b6 

aS 

01 

bl 

c328 

3 

98 

dd 

9e 

3a 

dO 

f 4 

e6 

fe 

ec 

c5aB 

3 

e9 

80 

60 

aO 

00 

bl 

f b 

29 

cd 

cObO 

3 

09 

01 

85 

Öl 

58 

60 

78 

a5 

71 

c330 

3 

a5 

fe 

cd 

98 

3a 

dO 

c4 

20 

SB 

c5bO 

3 

80 

fO 

07 

bl 

fb 

29 

7f 

91 

ca 

cObB 

3 

01 

29 

fe 

85 

01 

aO 

00 

84 

de 

c338 

3 

cc 

ff 

60 

a2 

01 

20 

c9 

ff 

a8 

c5bB 


fb 

60 

bl 

fb 

09 

80 

91 

fb 

a2 

cOcO 

3 

fd 

a9 

aO 

85 

fe 

bl 

fd 

dO 

82 

c340 

3 

a9 

00 

85 

fe 

18 

a5 

fe 

65 

aO 

c5cö 

t 

60 

aO 

00 

20 

ad 

cS 

84 

f 9 

83 

cOcB 

3 

04 

a9 

20 

91 

fd 

cB 

dO 

f 5 

30 

c34B 

: 

fe 

65 

fe 

aa 

18 

a9 

00 

7d 

d8 

c5cB 

3 

20 

e4 

ff 

fO 

fb 

a4 

f 9 

48 

d6 

cOdO 

3 

eh 

fe 

a5 

fe 

c9 

a4 

dO 

ed 

5f 

c350 

3 

9f 

3a 

85 

fb 

a9 

04 

85 

fc 

bB 

c5dO 

: 

20 

ad 

c5 

68 

c9 

ld 

dO 

Ob 

24 

cOdB 

3 

a5 

01 

09 

01 

85 

01 

58 

60 

e3 

c358 

3 

aO 

28 

18 

•5 

fb 

7d 

aO 

3a 

6a 

C5d8 

3 

c8 

c4 

fd 

OB 

SB 

28 

fO 

e3 

dB 

cObO 

X 

a9 

04 

a2 

04 

aO 

07 

20 

ba 

ed 

c360 

3 

85 

fb 

90 

02 

e6 

fc 

88 

dO 

61 

c5e0 

X 

c8 

dO 

eO 

c9 

9d 

dO 

07 

cO 

80 

cOeB 

8 

ff 

20 

cO 

ff 

a2 

04 

20 

c9 

86 

C36B 

3 

fl 

aO 

00 

bl 

fb 

20 

d2 

ff 

ec 

c5e8 

s 

01 

90 

dB 

88 

10 

d5 

c9 

85 

5a 

cOfO 

3 

ff 

a9 

00 

B5 

fa 

a9 

04 

85 

8d 

c370 

's c8 98 dd 9e 3a 

f 4 

e6 

9b 

c5f 0 

3 

dO 

03 

B5 

fa 

60 

c9 

89 

fO 

5f 

cOfB 

3 

fb 

a2 

18 

a9 

Od 

20 

d2 

ff 

9d 

c37B 

3 

fe 

a5 

fe 

cd 

98 

3a 

dO 

c4 

ea 

c5f 8 

8 

f 9 

c9 

11 

dO 

03 

e6 

fe 

60 

5B 

clOO 

3 

aO 

27 

bl 

fa 

C9 

20 

dO 

05 

ea 

c3B0 

8 

20 

CC 

ff 

60 

a9 

Oe 

20 

d2 

43 

c600 

: 

c9 

Od 

fO 

f 9 

c9 

91 

dO 

03 

3d 

clOB 

3 

88 

10 

f 7 

30 

41 

a3 

03 

fO 

cb 

c3B8 

3 

ff 

a9 

80 

Bd 

Ba 

02 

a9 

00 

Bd 

c608 

3 

c6 

fe 

60 

c9 

8d 

fO 

f 9 

c9 

7a 

cllO 

3 

07 

a9 

Oe 

20 

d2 

ff 

dO 

Oc 

fc 

c390 

3 

85 

fe 

85 

fd 

a6 

fe 

a4 

fd 

a6 

c610 

3 

14 

dO 

lc 

cO 

01 

90 

ac 

88 

04 

cllB 

3 

a4 

04 

fO 

08 

a9 

20 

20 

d2 

bd 

c398 

: 

eB 

fO 

04 

ca 

4c 

a2 

c3 

a2 

81 

c618 

3 

84 

f 9 

cB 

bl 

fb 

88 

91 

fb 

43 

c 120 

3 

ff 

88 

dO 

f 8 

aO 

00 

bl 

fa 

7d 

c3a0 

3 

27 

88 

eO 

28 

90 

03 

a2 

00 

f 4 

c620 

3 

cB 

c8 

c4 

fd 

dO 

f 5 

88 

a9 

6f 

c 128 

3 

c9 

20 

bO 

06 

18 

69 

40 

4c 

55 

c3a8 

3 

cB 

c8 

fO 

01 

B8 

cO 

18 

90 

41 

c628 

3 

20 

91 

fb 

a4 

f 9 

10 

94 

c9 

aa 

c 130 

: 

46 

cl 

c9 

40 

bO 

03 

4c 

46 

b2 

c3b0 

3 

02 

aO 

17 

84 

fd 

86 

fe 

aO 

aa 

c630 

: 

94 

dO 

23 

84 

f 9 

a4 

fd 

88 

53 

C138 

3 

Cl 

c9 

60 

bO 

06 

18 

69 

80 

d4 

c3b8 

: 

ff 

18 

8a 

69 

dB 

85 

fb 

a9 

90 

c63B 

3 

bl 

fb 

c9 

20 

fO 

04 

c9 

60 

74 

c 140 

3 

4c 

46 

Cl 

1B 

69 

40 

20 

d2 

el 

c3c0 

3 

03 

85 

fc 

18 

a5 

fb 

69 

28 

f 8 

C640 

3 

dO 

Of 

80 

bl 

fb 

c8 

91 

fb 

34 

C148 

3 

ff 

cB 

cO 

28 

dO 

dB 

18 

a5 

60 

c3cB 

: 

85 

fb 

90 

02 

e6 

fc 

cB 

c4 

b2 

C648 


88 

c4 

f 9 

dO 

fS 

a9 

20 

91 

lb 

c 150 


fa 

69 

28 

B5 

fa 

90 

02 

eh 

c4 

c3dO 

3 

fd 

dO 

fO 

20 

ab 

c5 

20 

e4 

a9 

C650 


fb 

a4 

f 9 

4c 

c3 

c5 

c9 

93 

5e 

c 158 

3 

fb 

ca 

dO 

9f 

a9 

Od 

20 

d2 

09 

c3d8 

3 

ff 

fO 

fb 

c9 

n 

dO 

07 

20 

7b 

c65B 


dO 

Od 

a4 

fd 

88 

a9 

20 

91 

11 

c 160 

3 

ff 

20 

cc 

ff 

a9 

04 

20 

c3 

65 

c3e0 

3 

ab 

c5 

e6 

fd 

dO 

ae 

c9 

ld 

cb 

c660 

3 

fb 

80 

10 

fb 

c8 

10 

ec 

c9 

77 

C16B 

3 

ff 

60 

a5 

fB 

dO 

09 

a5 

f 7 

fc 

c3e8 

3 

dO 

07 

20 

ab 

c5 

e6 

fe 

dO 

ea 

c668 

3 

20 

90 

e8 

c4 

fd 

fO 

e4 

c9 

31 

Cl70 


c9 

01 

dO 

03 

4c 

41 

c2 

18 

58 

c3f 0 


a3 

c9 

91 

dO 

OB 

20 

ab 

c5 

b2 

c670 

3 

80 

90 

04 

c9 

aO 

90 

de 

20 

b5 

c 178 

8 

a9 

9e 

6d 

98 

3a 

6d 

98 

3a 

c5 

c3f B 

3 

c6 

f d 

4c 

94 

c3 

c9 

9d 

dO 

05 

c678 

3 

88 

c5 

91 

fb 

cB 

c4 

fd 

dO 

13 

clBO 

3 

6d 

98 

3a 

85 

fb 

85 

fd 

a9 

bO 

C400 

3 

08 

20 

ab 

c5 

c6 

fe 

4c 

94 

7b 

C680 

3 

01 

BB 

4c 

c3 

c5 

a2 

04 

68 

a3 

c 188 

3 

3a 

85 

fc 

85 

fe 

a9 

01 

85 

cl 

C40B 


c3 

c9 

14 

dO 

29 

20 

ab 

c5 

9d 

C68B 

3 

95 

f 9 

ca 

10 

fa 

a2 

ff 

9a 

c8 

c 190 

3 

f 9 

a9 

00 

85 

f a 

e6 

f 9 

dO 

7f 

, c410 

3 

a5 

fe 

f 0 

80 

38 

a5 

fb 

e5 

ed 

c690 

3 

a2 

00 

b5 

f 9 

48 

eB 

eO 

05 

38 

cl 98 

3 

02 

eh 

fa 

a5 

fa 

c5 

f 8 

90 

63 

c41B 

3 

fe 

85 

fb 

bO 

02 

c6 

fc 

a4 

81 

c698 

3 

dO 

f 8 

60 

a9 

01 

a2 

bc 

aO 

8b 

c laO 

8 

OB 

a5 

f 9 

c5 

f 7 

90 

02 

bO 

lf 

1 C420 

3 

fe 

bl 

fb 

88 

91 

fb 

cB 

c8 

b4 

c6aO 

3 

c6 

20 

bd 

ff 

a9 

04 

a2 

04 

33 

cla8 


Od 

18 

a5 

fd 

65 

bd 

B5 

fd 

41 

c42B 

3 

cO 

2B 

dO 

f 5 

BB 

a9 

20 

91 

69 

c6a8 

3 

aO 

07 

20 

ba 

ff 

20 

cO 

ff 

2f 

clbO 


90 

02 

e6 

fe 

dO 

df 

18 

a5 

92 

C430 

3 

fb 

c6 

fe 

4c 

94 

c3 

c9 

94 

8f 

c6b0 

3 

bO 

02 

a9 

00 

85 

02 

a9 

04 

e3 

clbB 

3 

fd 

65 

bd 

85 

f 9 

a5 

f e 

69 

23 

c43B 

: 

dO 

2f 

20 

ab 

c5 

38 

a5 

fb 

ca 

C6b8 

3 

20 

c3 

ff 

60 

20 

a9 

30 

B5 

el 

c IcO 


00 

85 

fa 

aO 

02 

bl 

fb 

dl 

97 

c440 

3 

e5 

fe 

85 

fb 

bO 

02 

c6 

fc 

b5 

c6c0 


fd 

a9 

3a 

dO 

06 

a9 

20 

85 

74 

clc8 

3 

f 9 

90 

07 

dO 

23 

cB 

c4 

bd 

ec 

C44B 

3 

aO 

27 

bl 

fb 

c9 

20 

fO 

07 

d7 

c6cB 

3 

fd 

a9 

ff 

B5 

fe 

a9 

00 

85 

93 

cldO 


dO 

f 3 

18 

a5 

fb 

65 

bd 

85 

41 

c450 

3 

c9 

60 

fO 

03 

4c 

94 

c3 

88 

6f 

c6d0 


fb 

a9 

04 

85 

fc 

a4 

d6 

18 

d2 

cldB 

3 

fb 

90 

02 

e6 

fc 

a5 

fc 

c5 

f 5 

c458 

3 

bl 

fb 

c8 

91 

fb 

88 

c4 

fe 

80 

c6d8 

3 

a5 

fb 

69 

28 

85 

fb 

90 

02 

59 

cleO 

3 

fe 

90 

eO 

dO 

08 

a5 

fb 

c5 

a2 

c460 

: 

dO 

f 5 

a9 

20 

91 

fb 

4c 

94 

ed 

c6e0 


e6 

fc 

88 

dO 

f 2 

18 

a5 

fb 

ff 

cle8 


fd 

90 

d8 

fO 

d6 

4c 

41 

c2 

de 

c468 

3 

c3 

c9 

13 

dO 

06 

20 

ab 

c5 

8a 

c6e8 

3 

65 

d3 

85 

fb 

90 

02 

e6 

fc 

c6 

cif 0 

3 

aO 

00 

bl 

f 9 

99 

00 

01 

c8 

6b 

c470 


4c 

84 

c3 

c9 

93 

dO 

06 

85 

Ob 

c6f 0 


aO 

00 

a9 

3e 

91 

fb 

c8 

b9 

52 

cif 8 

3 

c4 

bd 

dO 

f 6 

18 

a5 

f 9 

65 

Of 

c478 

3 

f a 

20 

ab 

c5 

60 

c9 

8d 

dO 

52 

c6f 8 


00 

01 

dO 

02 

a9 

20 

20 

SB 

la 

c200 


bd 

85 

fd 

a5 

fa 

69 

00 

85 

ba 

C480 

3 

Oc 

20 

ab 

c5 

a9 

00 

85 

fe 

ef 

C700 

3 

c5 

91 

fb 

c8 

c4 

fa 

fO 

ef 

6d 

c20B 


fe 

90 

06 

aO 

00 

bl 

f 9 

91 

7d 

c48B 

3 

eh 

fd 

4c 

94 

c3 

c9 

Od 

fO 

b3 

C70B 

3 

90 

ed 

a9 

3c 

91 

fb 

aO 

Ol 

fe 

c210 

3 

fd 

38 

a5 

f d 

e9 

01 

85 

fd 

Ob 

c490 

3 

fO 

c9 

85 

dO 

Ob 

85 

f a 

20 

e9 

c710 

3 

20 

ad 

c5 

84 

f 9 

20 

e4 

ff 

3d 

C218 


bO 

02 

c6 

f e 

38 

a5 

f 9 

e9 

c7 

c49B 


ab 

c5 

a9 

00 

Bd 

8a 

02 

60 

86 

c718 

3 

fO 

fb 

48 

a4 

f 9 

20 

ad 

c5 

0f 

c220 

: 

01 

85 

f 9 

bO 

02 

c6 

f a 

a5 

06 

c4a0 


c9 

89 

fO 

fl 

c9 

86 

dO 

65 

87 

c720 

3 

68 

c9 

Od 

dO 

03 

85 

fa 

60 

d3 

C228 

3 

fc 

cS 

fa 

90 

de 

dO 

OB 

a5 

b7 

c4aB 

3 

20 

ab 

c5 

a5 

fd 

f 0 

5b 

a9 

ec 

c728 

3 

c9 

85 

fO 

f 9 

c9 

89 

fO 

f 5 

c8 

c230 


fb 

c5 

f 9 

90 

d6 

fO 

d4 

b9 

5a 

c4b0 


00 

85 

fb 

a9 

04 

85 

fc 

a4 

51 

C730 

3 

c9 

13 

fO 

da 

c9 

ld 

dO 

07 

fl 

c238 

3 

00 

01 

91 

fb 

cB 

c4 

bd 

dO 

eB 

c4b8 

3 

fd 

18 

a5 

fb 

69 

28 

85 

fb 

90 

C738 


c4 

fa 

bO 

d4 

cB 

dO 

dl 

c9 

2e 

c240 


f 6 

e6 

f 7 

dO 

02 

e6 

f 8 

aS 

48 

c4c0 


90 

02 

e6 

fc 

B8 

dO 

f 2 

38 

f 6 

c740 


9d 

dO 

07 

cO 

01 

fO 

c9 

88 

ef 

c248 

3 

f 8 

cd 

9d 

3a 

bO 

03 

4c 

77 

19 

c4c8 

3 

a5 

fb 

e9 

28 

85 

f 9 

a5 

fc 

a3 

c740 


10 

c6 

c9 

93 

dO 

Ob 

a4 

f a 

8e 

c250 


cl 

a5 

f 7 

cd 

9c 

3a 

90 

f 6 

67 

c4dO 


e9 

00 

85 

fa 

aO 

27 

bl 

fb 

7c 

c750 


a9 

20 

91 

fb 

88 

dO 

fb 

fO 

ce 

c258 


60 

a2 

01 

20 

c6 

ff 

20 

e4 

04 

c4d8 

3 

91 

f 9 

88 

10 

f 9 

18 

a5 

f 9 

75 

c75B 

3 

b5 

c9 

14 

dO 

ld 

cO 

01 

f 0 

cf 

c260 


ff 

20 

e4 

ff 

20 

e4 

ff 

85 

dd 

c4e0 


69 

28 

85 

f 9 

90 

02 

e6 

fa 

a8 

c760 

3 

af 

84 

f 9 

bl 

fb 

88 

91 

fb 

48 

c268 

8 

63 

20 

e4 

ff 

85 

62 

a2 

90 

2b 

c4eB 


18 

a5 

fb 

69 

28 

85 

fb 

90 

bf 

C768 

3 

c8 

cB 

c4 

fa 

fO 

f 5 

90 

f 3 

Oe 
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ANWENDUNG 


C64 


c770 

: 

88 

a9 

20 

91 

fb 

a4 

f 9 

88 

e5 

c9f 0 


aS 

fc 

cd 

9d 

3a 

90 

14 

a5 

fe 

cc70 

• 

d2 

ff 

c8 

cO 

Ob 

dO 

f5 

8a 

bO 

c778 


dO 

96 

c9 

94 

dO 

23 

84 

f 9 

c4 

c9f 8 


f b 

cd 

9c 

3a 

90 

Od 

a5 

fb 

48 

cc7B 

: 

1B 

69 

30 

20 

d2 

ff 

aO 

00 

05 

c780 


a4 

fa 

bl 

fb 

a4 

f 9 

c9 

20 

Of 

caOO 


e9 

01 

85 

fb 

bO 

02 

c6 

fc 

7b 

cc80 

: 

b9 

dl 

cd 

20 

d2 

ff 

c8 

CO 

6b 

c788 

s 

fO 

04 

c9 

60 

dO 

82 

a4 

f a 

a2 

caOB 


4c 

eO 

c9 

4c 

96 

c9 

00 

00 

78 

cc88 

; 

05 

dO 

f 5 

8a 

48 

Oa 

Oa 

Oa 

d5 

c790 


B8 

bl 

fb 

c8 

91 

fb 

8B 

c4 

ad 

calO 


00 

00 

00 

00 

00 

00 

00 

00 

11 

cc90 

- 

Oa 

a8 

18 

69 

10 

85 

fb 

a6 

8c 


: 

f 9 

dO 

f 5 

a9 

20 

91 

fb 

dO 

cc 

ca 18 


00 

00 

00 

00 

00 

00 

00 

00 

19 

cc9B 

: 

fc 

fO 

06 

b9 

4d 

ce 

4c 

a4 

8b 

c7a0 


08 

c9 

80 

90 

07 

c9 

aO 

bO 

62 

ca20 


00 

00 

00 

00 

00 

00 

00 

00 

21 

ccaO 

t 

cc 

b9 

ed 

cd 

20 

d2 

ff 

cB 

a8 

c7a8 

: 

03 

4c 

10 

c7 

c9 

22 

fO 

f 9 

34 

ca2B 


00 

OO 

OO 

00 

00 

00 

00 

OO 

29 

cca8 

; 

c4 

fb 

dO 

eb 

aO 

07 

a9 

20 

44 

c7bO 

: 

c9 

2a 

fO 

f 5 

c9 

2c 

fO 

fl 

2f 

ca30 


00 

a2 

01 

20 

c6 

ff 

aO 

01 

b7 

ccbO 

: 

20 

d2 

ff 

88 

dO 

f 8 

a9 

7d 

cl 

c7b8 

: 

c9 

3a 

fO 

ed 

c9 

3f 

fO 

e9 

c6 

ca38 


84 

06 

98 

Oa 

18 

65 

06 

a8 

3d 

ccbS 

: 

20 

d2 

ff 

a9 

Od 

20 

d2 

ff 

93 

c7c0 

: 

c9 

3d 

fO 

e5 

c5 

fd 

bO 

04 

38 

ca40 


b9 

9b 

3a 

85 

f 9 

b9 

9c 

3a 

5a 

cccO 

: 

68 

aa 

e8 

eO 

07 

dO 

8f 

a9 

5c 

c7c8 

: 

c9 

20 

dO 

dd 

c5 

fe 

90 

04 

30 

ca48 


85 

f a 

b9 

9d 

3a 

85 

fd 

a4 

7d 

ccc8 

- 

20 

20 

d2 

ff 

a9 

7d 

20 

d2 

59 

c7dO 

: 

c9 

aO 

dO 

d5 

20 

BB 

c5 

91 

59 

ca50 


06 

b9 

Od 

ca 

dO 

11 

aO 

00 

eB 

ccdO 

: 

ff 

aO 

24 

a9 

20 

20 

d2 

ff 

ac 

c7d8 

: 

fb 

c4 

fa 

fO 

cc 

cB 

dO 

c9 

fc 

ca58 


98 

48 

20 

e4 

ff 

68 

a8 

c8 

30 

ccdB 

s 

88 

dO 

f 8 

a9 

7d 

20 

d2 

ff 

60 

c7eü 

3 

cB 

dO 

el 

a9 

00 

85 

fb 

a9 

2d 

ca60 


c4 

f 9 

dO 

f 4 

4c 

c4 

ca 

a9 

5d 

cceO 

: 

a9 

Od 

20 

d2 

ff 

aO 

00 

b9 

eb 

c7e8 

: 

dB 

85 

fc 

a2 

18 

aO 

27 

a9 

8d 

ca68 


00 

85 

fb 

a9 

04 

85 

fc 

18 

ef 

cce8 

: 

d5 

cd 

20 

d2 

ff 

cB 

cO 

28 

aO 

C7f0 

: 

07 

91 

fb 

8B 

10 

fb 

18 

a5 

5c 

ca70 


a5 

fb 

65 

fa 

B5 

fb 

90 

02 

4a 

ccf 0 

: 

dO 

f 5 

60 

4c 

df 

c7 

Be 

93 

fa 

c7-f 8 

: 

fb 

69 

28 

85 

fb 

90 

02 

e6 

7d 

ca78 


e6 

fc 

a4 

fd 

fO 

Oe 

18 

a5 

fO 

ccf 8 

- 

11 

11 

20 

20 

20 

20 

20 

20 

62 

c800 

3 

fc 

ca 

dO 

e9 

60 

ad 

9c 

3a 

2d 

ca80 


•fb 

69 

28 

B5 

fb 

90 

02 

e6 

05 

cdOO 

: 

20 

20 

dS 

cO 

cO 

cO 

cO 

cO 

54 

c808 

: 

B5 

fb 

ad 

9d 

3a 

Ü5 

fc 

a9 

cl 

ca88 


fc 

88 

dO 

f 2 

bl 

fb 

c9 

2a 

dl 

cdOB 

: 

cO 

cO 

cO 

cO 

cO 

cO 

cO 

cO 

07 

c810 

: 

00 

85 

60 

85 

61 

85 

fa 

a9 

ld 

ca90 


dO 

Oe 

98 

48 

20 

e4 

ff 

68 

90 

cd 10 

: 

cO 

cO 

cO 

cO 

cO 

cO 

cO 

cO 

Of 

c818 

: 

dB 

85 

fd 

a9 

01 

85 

f 9 

a9 

df 

ca9B 


a8 

c8 

c4 

f 9 

dO 

f 4 

fO 

24 

d5 

cdl8 

8 

c9 

Od 

20 

20 

20 

20 

20 

20 

38 

c820 

3 

03 

85 

f e 

ad 

99 

3a 

Oa 

18 

lf 

caaO 


c9 

3f 

dO 

06 

20 

e4 

ff 

4c 

bf 

cd20 

: 

20 

20 

dd 

20 

48 

20 

41 

20 

97 

cB2B 

3 

6d 

99 

3a 

a8 

a5 

fd 

79 

9c 

6f 

caaS 


bf 

cä 

98 

48 

20 

e4 

ff 

aa 

7a 

cd2B 

: 

55 

20 

50 

20 

54 

20 

4d 

20 

61 

c830 

: 

3a 

85 

fd 

90 

02 

e6 

io 

b9 

85 

cabO 


68 

a8 

8a 

dl 

fb 

fO 

08 

20 

fl 

cd30 

s 

45 

20 

4e 

20 

55 

20 

45 

20 

c9 

c838 

: 

9b 

3a 

85 

bd 

18 

69 

02 

B5 

b9 

cab8 


cc 

ff 

a9 

00 

85 

f8 

60 

cB 

21 

cd38 

3 

dd 

Od 

20 

20 

20 

20 

20 

20 

6c 

c840 

3 

b6 

b9 

9d 

3a 

aB 

18 

a5 

fd 

5f 

cacO 


c4 

f 9 

dO 

c8 

a4 

06 

cc 

9B 

ad 

cd40 

3 

20 

20 

ca 

cO 

cO 

cO 

cO 

cO 

d2 

c84B 

: 

69 

28 

85 

fd 

90 

02 

e6 

fe 

99 

cac8 


3a 

fO 

04 

c8 

4c 

38 

ca 

20 

86 

cd48 

3 

cO 

cO 

cO 

cO 

cO 

cO 

cO 

cO 

47 

c850 

: 

BB 

10 

f 2 

38 

a5 

fb 

e5 

f 9 

6a 

cadO 


cc 

ff 

a9 

01 

85 

f8 

60 

a5 

13 

cd50 

3 

cO 

cO 

cO 

cO 

cO 

cO 

cO 

cO 

4f 

c85B 

: 

85 

f 7 

aS 

fc 

e5 

fa 

85 

f8 

20 

cad8 


fa 

a2 

00 

86 

fa 

c9 

la 

dO 

fc 

cd5B 

I 

cb 

11 

Od 

20 

d5 

cO 

cO 

cO 

db 

c860 

3 

18 

a5 

f 7 

69 

02 

85 

f 7 

90 

c3 

caeO 


2f 

aO 

23 

b9 

ec 

ca 


d2 

ab 

cd60 

I 

cO 

cO 

cO 

cO 

cO 

cO 

cO 

cO 

5f 

c868 

3 

02 

e6 

f 8 

46 

f 8 

66 

f 7 

18 

b7 

cae8 


ff 

88 

dO 

f 7 

60 

21 

20 

4e 

8b 

cd6B 

: 

cO 

cO 

cO 

cO 

cO 

cO 

cO 

cO 

67 

c870 

3 

a5 

f 7 

65 

f 9 

85 

f 7 

a5 

fB 

4a 

cafO 


45 

4e 

52 

45 

46 

54 

4e 

45 

64 

cd70 

3 

cO 

cO 

cO 

cO 

cO 

cO 

cO 

cO 

6f 

cB78 

3 

65 

fa 

85 

f 8 

38 

a5 

f 7 

e9 

3f 

caf 8 


20 

5a 

54 

55 

48 

43 

53 

42 

76 

cd78 

: 

cO 

cO 

cO 

cO 

cO 

cO 

cO 

cO 

77 

c880 

3 

01 

85 

f 7 

bO 

02 

c6 

f 8 

aS 

dd 

. cbOO 


49 

45 

52 

48 

43 

53 

20 

45 

63 

cdBO 

: 

cO 

c9 

Od 

8e 

93 

11 

11 

20 

80 

cBBB 

8 

*8 

cS 

61 

dO 

Ob 

aS 

f 7 

c5 

le 

I cbOB 


54 

54 

49 

42 

20 

20 

20 

11 

c7 

cd88 

3 

20 

20 

20 

20 

20 

20 

20 

d5 

f 4 

cB90 

3 

60 

dO 

05 

a9 

00 

85 

f 8 

60 

aO 

(cblO 


c9 

3e 

dO 

27 

aO 

lb 

b9 

lf 

19 

cd90 

: 

cO 

cO 

cO 

cO 

cO 

cO 

cO 

cO 

Bf 

CB9B 

8 

a5 

f 7 

85 

60 

aS 

fB 

85 

61 

al 

cblB 


cb 

20 

d2 

ff 

88 

dO 

f 7 

60 

57 

cd9B 

8 

cO 

cO 

cO 

cO 

cO 

cO 

cO 

cO 

97 

cBaO 

3 

aO 

00 

a9 

aO 

85 

05 

a9 

3a 

5a 

cb20 


21 

20 

4e 

45 

44 

4e 

41 

48 

da 

cdaO 

: 

cO 

cO 

cO 

cO 

cO 

c9 

Od 

20 

d7 

cBaB 

8 

85 

06 

a2 

03 

18 

aS 

05 

6d 

d7 

cb2S 


52 

4f 

56 

20 

54 

48 

43 

49 

e3 

cdaB 

3 

20 

20 

20 

20 

20 

20 

20 

dd 

24 

c8b0 

3 

98 

3a 

85 

05 

ca 

dO 

f5 

98 

a4 

cb30 


4e 

20 

49 

45 

54 

41 

44 

20 

2a 

cdbO 

3 

20 

20 

20 

44 

49 

53 

4b 

4f 

6c 

cBbB 

3 

4B 

aO 

01 

a2 

00 

e4 

61 

dO 

33 

cb38 


20 

20 

11 

c9 

3f 

dO 

29 

aO 

46 

cdbS 

3 

50 

45 

52 

41 

54 

49 

4f 

4e 

dl 

cBcO 

8 

04 

c4 

60 

fO 

17 

18 

a5 

05 

2f 

cb40 


ld 

b9 

4a 

cb 

20 

d2 

ff 

88 

ef 

cdcO 

8 

45 

4e 

20 

20 

20 

dd 

Od 

dd 

19 

cBcB 

3 

65 

b6 

85 

05 

90 

02 

e6 

06 

4b 

Cb48 


dO 

f 7 

60 

21 

20 

4e 

45 

44 

62 

cdcB 

3 

20 

20 

dd 

20 

20 

20 

20 

20 

38 

c8dO 

3 

cB 

dO 

01 

eB 

e4 

61 

dO 

ed 

d6 

cbSO 


4c 

41 

48 

52 

4f 

56 

20 

53 

6a 

cddO 

3 

28 

20 

29 

20 

20 

20 

ca 

cO 

06 

cBdB 

3 

c4 

60 

dO 

e9 

68 

a8 

bl 

fd 

cc 

cb5B 


54 

49 

45 

52 

45 

42 

20 

49 

66 

cddB 

3 

cO 

cO 

cO 

cO 

CO 

cO 

cO 

cO 

d7 

c8e0 

3 

c9 

2a 

fO 

25 

c9 

3f 

fO 

21 

3c 

cb60 


45 

54 

41 

44 

20 

20 

20 

11 

4e 

cdeO 

s 

cO 

cO 

cO 

cO 

cO 

cO 

cO 

cO 

df 

c8eB 

3 

dl 

05 

bO 

Ob 

a5 

60 

85 

fb 

35 

cb68 


c9 

48 

dO 

29 

aO 

ld 

b9 

77 

77 

cde8 

3 

cO 

cO 

cO 

cO 

cO 

cO 

cO 

cO 

e7 

c8f 0 

3 

a5 

61 

85 

fc 

4c 

53 

c8 

fO 

ab 

cb70 


cb 20 d2 

ff 88 dO w iO 

af 

cdfO 

3 

cO 

cO 

cO 

cO 

cO 

cO 

cO 

cO 

ef 

c8f B 

3 

Ob 

a5 

60 

85 

f 9 

a5 

61 

85 

fc 

cb7B 


21 

20 

45 

54 

54 

45 

4b 

53 

cB 

cdf 8 

8 

cO 

cO 

cO 

cb 

Od 

44 

41 

54 

62 

c900 

: 

fa 

4c 

53 

cB 

cB 

c4 

bd 

dO 

59 

cbBO 


49 

44 

20 

46 

55 

41 

20 

5a 

51 

ceöO 

8 

45 

49 

20 

45 

49 

4e 

52 

49 

7d 

c90B 

3 

d5 

a5 

60 

85 

f 9 

aS 

61 

85 

d6 

cb88 


54 

41 

4c 

50 

20 

4e 

49 

45 

be 

ceOB 

8 

43 

48 

54 

45 

4e 

44 

41 

54 

e2 

c910 

8 

fa 

aO 

00 

a9 

aO 

85 

05 

a9 

2d 

cb90 


4b 

20 

20 

20 

11 

c9 

4a 

dO 

22 

ce 10 

8 

45 

4* 

20 

45 

49 

4e 

47 

45 

de 

C918 

3 

3a 

B5 

06 

a2 

03 

18 

aS 

05 

7c 

cb98 


39 

aO 

ld 

b9 

a4 

cb 

20 

d2 

6f 

cel8 

8 

42 

45 

4e 

20 

20 

44 

41 

54 

66 

c920 

3 

6d 

98 

3a 

85 

05 

ca 

dO 

f5 

ee 

cbaO 


ff 

88 

dO 

f 7 

60 

21 

20 

4e 

43 

ce20 

3 

45 

4e 

20 

53 

55 

43 

48 

45 

la 

c928 

3 

9B 

48 

38 

aS 

05 

eS 

b6 

bO 

63 

cbaS 


45 

47 

45 

4c 

4e 

49 

45 

20 

fO 

ce2B 

3 

4e 

20 

20 

20 

20 

44 

52 

55 

ab 

c930 

3 

02 

c6 

06 

38 

e5 

b6 

bO 

02 

f 9 

cbbO 


45 

54 

54 

45 

4b 

53 

49 

44 

da 

c#30 

3 

43 

4b 

45 

52 

50 

41 

52 

41 

Bf 

c938 

3 

c6 

06 

85 

05 

a2 

00 

aO 

00 

bO 

cbb8 


20 

45 

54 

54 

49 

42 

20 

20 

82 

ce38 

3 

4d 

45 

54 

45 

52 

44 

49 

53 

f 9 

c940 

3 

18 

a5 

05 

65 

b6 

85 

05 

90 

e6 

cbcO 


20 

11 

a2 

ff 

e2 

ed 

00 

ff 

af 

ce40 

: 

4b 

4f 

50 

45 

52 

41 

54 

49 

03 

c94B 

3 

02 

e6 

06 

c8 

dO 

01 

e8 

e4 

da 

cbcB 


a2 

ff 

ef 

11 

ae 

01 

bb 

46 

f 6 

ce48 

: 

4f 

4e 

45 

4e 

20 

50 

52 

4f 

46 

c950 

8 

f a 

dO 

ed 

c4 

f 9 

dO 

e9 

68 

65 

cbdO 


00 

11 

85 

fa 

60 

00 

a2 

Of 

c8 

ce50 

: 

47 

52 

41 

4d 

4d 

20 

45 

4e 

42 

c958 

3 

a8 

bl 

fd 

c9 

2a 

fO 

lf 

c9 

cc 

cbdB 


20 

c9 

ff 

aO 

04 

b9 

10 

cc 

f 9 

ce58 

: 

44 

45 

20 

20 

20 

44 

49 

52 

39 

c960 

8 

3f 

fO 

lb 

bl 

05 

dl 

fd 

bO 

4d 

cbeO 


20 

d2 

ff 

8B 

10 

f 7 

20 

cc 

55 

ce60 

8 

45 

43 

54 

4f 

52 

59 

20 

20 

f 7 

c96B 

3 

10 

38 

a5 

f 9 

e9 

01 

85 

fb 

f 2 

cbe8 


ff 

a2 

Of 

20 

c6 

ff 

20 

e4 

b7 

ce68 

3 

20 

20 

20 

20 

20 

44 

41 

54 

76 

c970 

8 

a5 

fa 

e9 

00 

85 

fc 

4c 

96 

ab 

cbf 0 


ff 

85 

fa 

a2 

Of 

20 

c9 

ff 

de 

ce70 

: 

45 

49 

20 

4c 

4f 

45 

53 

43 

de 

c97B 

3 

c9 

cB 

C 4 

bd 

dO 

db 

a5 

fa 

07 

cbf 8 


aO 

04 

b9 

ld 

cc 

20 

d2 

ff 

c5 

ce78 

8 

48 

45 

4e 

20 

20 

44 

41 

54 

cc 

c980 

8 

dO 

06 

a5 

f 9 

c9 

01 

fO 

e2 

2a 

ccOO 


88 

10 

f 7 

20 

cc 

ff 

a2 

Of 

08 

ce80 

8 

45 

49 

20 

55 

4d 

42 

43 

4e 

b5 

C98B 

8 

38 

a5 

f 9 

e9 

01 

B5 

f 9 

bO 

d4 

ccOS 


20 

c6 

ff 

20 

e4 

ff 

85 

fb 

ec 

ce8B 


45 

4e 

4e 

45 

4e 

44 

49 

53 

03 

c990 

3 

02 

c6 

fa 

4c 

11 

c9 

aO 

00 

lf 

cclO 


20 

e4 

ff 

4c 

cc 

ff 

00 

00 

f B 

ce90 

3 

4b 

20 

46 

4f 

52 

4d 

41 

54 

a4 

c998 

3 

a9 

aO 

85 

05 

a9 

3a 

85 

06 

22 

cclB 


02 

fa 

52 

2d 

4d 

02 

fc 

52 

4f 

ce98 

3 

49 

45 

52 

45 

4e 

44 

49 

53 

94 

c9aO 

3 

a2 

03 

18 

a5 

05 

6d 

98 

3a 

11 

cc20 


2d 

4d 

a9 

OO 

2c 

a9 

01 

85 

7d 

ceaO 


41, 

20 

56 

41 

4c 

49 

44 

49 

6c 

c9aB 

3 

B5 

05 

ca 

dO 

f 5 

98 

48 

a2 

07 

cc2B 


fc 

aO 

00 

a5 

fc 

dO 

Od 

b9 

27 

cea8 

3 

45 

52 

45 

4e 

20 

48 

41 

55 

25 

c9b0 

3 

OO 

aO 

00 

1B 

a5 

05 

65 

b6 

89 

cc30 


f 6 

cc 

20 

d2 

ff 

cB 

cO 

44 

cO 

cebO 

3 

50 

54 

4d 

45 

4e 

55 

45 

20 

Ob 

c9bB 

3 

85 

05 

90 

02 

e6 

06 

c8 

dO 

88 

cc3B 


dO 

f 5 

fO 

Ob 

b9 

83 

cd 

20 

cf 

cebB 

8 

20 

20 

20 

20 

20 

20 

a9 

00 

9e 

c9c0 

3 

01 

e8 

e4 

fc 

dO 

ed 

c4 

fb 

95 

CC40 


d2 

ff 

cB 

cO 

44 

dO 

f5 

aO 

40 

cecO 

3 

85 

cl 

a9 

aO 

85 

c2 

a9 

cl 

3d 

c9c8 

3 

dO 

e9 

68 

a8 

bl 

fd 

c9 

2a 

42 

cc48 


00 

b9 

3a 

cd 

20 

d2 

ff 

cB 

97 

cecB 


85 

ae 

a9 

a3 

85 

af 

78 

a5 

86 

c9d0 

3 

fO 

04 

c9 

3f 

dO 

06 

a4 

db 

a4 

cc50 


cO 

49 

dO 

f 5 

a2 

01 

a9 

20 

cl 

cedO 

: 

01 

29 

fe 

85 

01 

20 

ed 

f5 

Bb 

c9d8 

3 

88 

4c 

ea 

c9 

dl 

05 

bO 

05 

Bc 

cc5B 


20 

d2 

ff 

a9 

7d 

20 

d2 

ff 

3a 

cedd 


a5 

01 

09 

01 

85 

01 

58 

60 

e3 

c9e0 

3 

a9 

01 

85 

f 8 

60 

cS 

c4 

bd 

65 

cc60 


aO 

24 

a9 

20 

20 

d2 

ff 

B8 

2a 












c9e8 

: 

dO 

e2 

e6 

fb 

dO 

02 

e6 

fc 

15 

cc68 


dO 

fa 

aO 

00 

b9 

c7 

cd 

20 

2f 

Listing 2. Programm »d2« (Schluß) 


100 

REM ******************************* 

<238 > 

190 

INPUT"(DOWNISEKUNDAERADRESSE :";SA 

<202> 

110 

REM * DRUCKERANPASSUNG * 

<162> 

200 

INPUT"(DOWNJSTEUERCODE FUER BREITSCHRI 


120 

REM ******************************* 

<002> 


FT :”;BR 

<035> 

130 

; 

< 106> 

210 

POKE 50855,GA:POKE 49379,GA 

<231 > 

140 

PRINT"(CLR,4D0WN,12SPACE > DRUCKERANPASS 


220 

POKE 50857,SA:POKE 49381,SA 

<091 > 


UNG" 

<155> 

230 

POKE 49426,BR 

< 15B> 

150 

PRINT" C 12SPACE}’t't't't’t’i’t'i'tY i'TTi'T'f" 

<039> 

240 

OPEN 1,8,15,"S:D2":CL0SE 1 

<025 > 

160 

PRINT:PRINT:PRINT 

<029> 

250 

SYS (57812)"D2",8:POKE 193,0:POKE 194, 


170 

SYS (57812)"D2",B:P0KE 780,0:POKE 781, 



192:POKE 174,224:POKE 175,206 

< 175> 


0:POKE 782,192:SYS 65493 

< 113> 

260 

SYS 62957 

<099> 

180 

INPUT"GERAETEADRESSE :'';GA 

< 128> 





Listing 3. Zur einfachen Anpassung von Polydat an Ihren Drucker können Sie dieses Programm verwenden 
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TIPS & TRICKS 


PEEKs und POKEs alphabetisch 


Die alphabetische Liste der PEEKs und POKEs 
soll zum schnellen Nachschlagen dienen, wenn 
Sie eine bestimmte Funktion suchen, die in Basic 
sonst nicht zu verwirklichen ist. 

D ie Liste ist in fünf große Gruppen unterteilt, um die 
speziellen Funktionen schneller finden zu können. 
Der erklärende Text mit ausführlicher Beschreibung 
soll Ihnen weiterhin helfen, die aufgeführten PEEKs und 
POKEs besser nutzen zu können. 

Allerdings geht Probieren über Studieren und Sie sollten 
alles einmal selbst ausprobieren. 


Ein-/Ausgabesteuerung allgemein 


ASCII-Code der letzten gedrückten Taste (CHR$(0)=keine 
Taste gedrückt) 

PEEK(197)_ 

Bildschirmcode des Zeichens unter dem Cursor: 
PEEK(206)_ 

Cursor blinkt schneller 

POKE 788,62_ 

Cursorblinken während Programmablauf einschalten 
POKE 204,1 __ 

Cursorblinken ausschalten 

POKE 204,0_ 

Cursor auf angegebene Position setzen (X=Zeile (0 bis 24); 
Y= Spalte (0 bis 39)). 

POKE 211,X:POKE 214,Y_ 

Fehlermeldungsausgabe sperren 

POKE 768,61_ 

Fehlermeldungsausgabe wieder zulassen mit 

POKE 768,139_ 

Hintergrundfarbe bestimmen (Farbcode: 0 bis 15) 

POKE 53281, Farbcode_ 

Rahmenfarbe festlegen 

POKE 53280, Farbcode_ 

INPUT-Befehl: Ausgabe des Fragezeichens unterdrücken 
(Achtung: Cursor springt nach < RETURN > nicht mehr in 
die nächste Zeile). 

POKE 19,1_ 

Normales Verhalten bei INPUT wiederherstellen 
POKE 19,0_ 

Invers-Darstellung einschalten 

POKE 199,1_ 

Insert-Modus ausschalten (vor jeder GET-Anweisung 
POKE 216,0 verhindert in Eingaberoutinen etc., daß die 
Betätigung einer Cursortaste nach <SHIFT INS/DEL> 
Grafikzeichen erzeugt). 

POKE 216,0_ 

Joystickabfrage Port 1 (1 oben; 2 unten; 4 links; 8 rechts; 16 
Feuer). 

PEEK(56320)_ 

Joystickabfrage Port 2 (1 oben; 2 unten; 4 links; 8 rechts; 16 
Feuer). 

PEEK(56321) 


Länge des Tastaturpuffers ändern 

(X=Länge des Puffers=Maximalanzahl der bei zu schnel¬ 
len Eingaben zur Weiterverarbeitung gespeicherten 
Tasten) 

POKE 649,X_ 

Listing ohne Zeilennummern 

POKE 22,35_ 

Repeatfunktion für Tasten (X=0 Normalzustand; X=64 
Repeatfunktion für alle Tasten ausschalten; X=128 Repeat¬ 
funktion für alle Tasten einschalten). 

POKE 650,X_ 

Abfrage der Sondertasten 
PEEK(653) 

(1 = SHIFT-Taste gedrückt; 2 = CBM-Taste; 4 = CTRL- 
Taste)._ 

Tastaturpuffer löschen nach jeder GET-Anweisung sorgt 
dafür, daß im Tastaturpuffer gespeicherte und noch nicht 
verarbeitete Zeichen gelöscht werden - das »Nachlaufen« 
von Basic-Programmen bei zu schneller Eingabe wird ver¬ 
hindert. 

POKE 198,0_ 

Zeichen in Tastaturpuffer schreiben 
POKE 631,ASC(" A*):POKE 632,ASC("B")... 
ASCII-Codes der Tasten <A>, <B>,... in den Tastatur¬ 
puffer schreiben, um entsprechende Tastenbetätigung zu 
simulieren. 

Zeictfi. nfarbe bestimmen (X=Farbcode: 0 bis 15) 

POKE 646,X_ 

Zeichensatz-Umschaltung sperren 

POKE 657,128_ 

Umschaltung wieder zulassen 

POKE 657,0_ 

1. Die Arbeitsweise des Tastaturpuffers zeigt am besten 
ein kleines Beispiel, wie die folgende »Mini-Textverar¬ 
beitung«: 

100 GET A$ 

110 F0R 1=1 T0 100:NEXT I 
120 PRINT A$; 

130 GOTO 100 

Das Demoprogramm wartet auf eine Taste, gibt das zuge¬ 
hörige Zeichen aus und wartet anschließend erneut auf 
einen Tastendruck. Wegen der Warteschleife in Zeile 110 ist 
das Programm zu langsam, um Ihren Eingaben zu folgen, 
wenn Sie sich bemühen, möglichst schnell zu tippen. 

Die vom Programm noch nicht verarbeiteten Zeichen 
speichert der Computer im Tastaturpuffer ab Adresse 631 
für die spätere Verarbeitung. In der Speicherzelle 198 wird 
die Anzahl der noch zu verarbeitenden Zeichen abgelegt, 
die sich im Tastaturpuffer befinden. Es gehen also keine 
Zeichen verloren. Wenn der Benutzer schon längst keine 
Taste mehr betätigt, erscheinen die Zeichen allmählich 
nach und nach auf dem Bildschirm - das Programm »hinkt 
hinterher«. 

Dieses »Nachlaufen« ist bei Basic-Programmen, die mit 
GET arbeiten (Textverarbeitung, Eingaberoutine), pro¬ 
blemlos zu vermeiden, indem vor jeder GET-Anweisung in 
Speicherzelle 198 (Anzahl der Zeichen im Tastaturpuffer) 
der Wert 0 gePOKEt wird. Dem C64 wird damit simuliert, 
daß keine noch zu verarbeitenden Zeichen im Puffer vor¬ 
handen sind, und er wartet auf die nächste Tastenbetäti¬ 
gung. Nachteil: Bei zu schnellen Eingaben gehen die nicht 
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TIPS & TRICKS 


C64 


mehr sofort zu verarbeitenden Zeichen verloren, da sie 
nicht mehr im Puffer »gerettet« werden. 

2. »Simulierter Direktmodus«. Verschiedene Anweisun¬ 
gen sind nur im Direkt-, nicht im Programmodus möglich. 
Zum Beispiel können Sie nur im Direktmodus Programm¬ 
zeilen löschen oder ändern. 

Der Direktmodus kann jedoch im Programm simuliert 
werden. Die gewünschte Anweisung wird Zeichen für Zei¬ 
chen - die ASCII-Codes derZeichen! - in den Tastaturpuffer 
ab 631 gePOKEt. In 198 wird die Zeichenanzahl gePOKEt 
und das Programm mit END beendet. Nach dem Beenden 
eines Programms arbeitet der C64 automatisch die Zei¬ 
chen im Tastaturpuffer ab, also die von Ihnen dort abgeleg¬ 
ten Tasten. 

100 INPUT"FUNKTION (BSP. Y=2#C0S(X))A$ 

110 PRINT CHR$(147);:REM BILDSCHIRM LOESCHEN 
120 PRINT "210 ";A$:REM FUNKTION IN OBERSTE ZEILE 
130 PRINT "RUN 200":REM PROGRAMM AB ZEILE 200 
STARTEN 

140 P0KE 631,19:REM CODE VON 'CURSOR HOME' 

150 P0KE 632,13:REM RETURN-CODE 
160 P0KE 633,13:REM RETURN-CODE 
170 P0KE 198,3:REM SIMULATION VON 3 
TASTENBETAETIGUNGEN 
180 END 
190 

200 INPUT "X-WERT";X 

210 Y=SIN(X):REM DIESE ZEILE WIRD GEAENDERT !!! 

220 PRINT Y 

230 GET A$:IF A$="" THEN 230:REM AUF TASTE WARTEN 
240 GOTO 100:REM NEUE FUNKTION 

Wenn Sie dieses Demoprogramm eingeben und starten, 
werden Sie nach einer Funktion gefragt. Geben Sie zum 
Beispiel ein Y=2*X, und drücken Sie < RETURN >. 

Der Bildschirm wird gelöscht und in der obersten Zeile 
die Zeilennummer 210 und dahinter Ihre Funktionsvor¬ 
schrift ausgegeben. In der folgenden Zeile wird die Anwei¬ 
sung RUN 200 ausgegeben 
200 Y=S!N(X) 

RUN 200 

In den Tastaturpuffer werden nacheinander die Codes 
der Tasten < CURSOR HOME>, < RETURN > und noch¬ 
mal < RETURN > gePOKEt, in den »Zeichenzähler« 198 
entsprechend die Zahl 3. 

Nach der END-Anweisung bearbeitet der Computer die 
im Tastaturpuffer abgelegten Zeichen. Das erste Zeichen - 
CURSOR HOME - setzt den Cursor auf die oberste Bild¬ 
schirmzeile. Das zweite Zeichen - RETURN - sorgt für die 
Ausführung der Anweisung, also die Übernahme der 
neuen Funktion als Zeile 210. 

Der zweite RETURN-Code bewirkt die Ausführung der 
nächsten Anweisung: RUN 200. Das Programm wird ab 
Zeile 200 neu gestartet. Es fragt Sie nach einem X-Wert, 
berechnet mit der geänderten Funktionsvorschrift in Zeile 
210 den zugehörigen Y-Wert und gibt ihn aus. Wenn Sie 
anschließend eine beliebige Taste drücken, geht dieses 
Spiel von vorne los. 

Grafik 


(VIC=Speicherzelle 53248) 

Grafikmodus 

Einschalten: POKE VIC+17,PEEK(VIC+17) OR 32 
Ausschalten: POKE VIC+17,PEEK(VIC+17) AND 223 
Grafikspeicher 

Grafikspeicher-Startadresse ab Adresse 8192: POKE 
VlC+24,PEEK(VIC+24) OR 8 


Grafik löschen 

Grafikspeicher löschen (Voraussetzung: Beginn ab 8192) 
FOR 1=8192 TO 8192+8000:PQKE l,0:NEXT I_ 

Multicolor-Modus 

Einschalten (Voraussetzung: Grafikmodus wurde zuvor 
eingeschaltet) POKE VIC+22,PEEK(VIC+22) OR 16 
1. Grafikspeicher schützen. Wie Sie die Hires-Grafik ein-/ 
ausschalten, den Beginn des Grafikspeichers auf Adresse 
8192 legen und den Grafikspeicher löschen, finden Sie in 
der zugehörigen Abteilung unserer Liste. 

Anschließend liegt der Grafikspeicher jedoch mitten im 
eigentlich für das Basic-Programm und die Variablen ver¬ 
wendeten Speicherbereich. Eine Möglichkeit, dieses Pro¬ 
blem zu lösen, besteht darin, den für Basicprogramm ver¬ 
fügbaren Speicherbereich zu begrenzen und dem C64 mit¬ 
zuteilen, daß er bei Adresse 8191 endet: 

POKE 5,255:POKE 56,31 

Diese beiden Befehle sollten sich in der ersten Zeile Ihres 
Grafikprogramms befinden! Ihnen stehen nun zwar nur 
noch 7 KByte für Ihr Programm zur Verfügung, zum Experi¬ 
mentieren mit der Grafik reicht das jedoch allemal. 

2. Punkte setzen/löschen: Die »Grafik-POKEs« überneh¬ 
men zwar alle notwendigen Vorbereitungen, der eigentli¬ 
che Sinn von Grafikprogrammen, das Setzen oder Löschen 
von Punkten, fehlt jedoch in der Liste. Die folgenden beiden 
Formeln setzen voraus, daß den Variablen X und Y die 
Punktkoordinaten zugewiesen wurden. 

AD = 320 * INT(Y/8) + (Y AND 7) + 8*INT(X/8) 

BN = 7 - (X AND 7) 

Nach diesen Berechnungen kann der betreffende Punkt 
gesetzt oder gelöscht werden. 

Setzen: POKE 8192+AD,PEEK(8192+AD) OR 2t BN 
Lösche., POKE 8192+AD,PEEK(8192+AD) AND (255- 
2 t BN) 

Die obigen Berechnungen funktionieren jedoch nur, 
wenn die Hires-Grafik mit 320 x 200 Punkten eingeschaltet 
ist. AD ist dabei die Nummer des Bytes ab der Anfangs¬ 
adresse des Grafikbildschirms und BN ist die Nummer des 
Bits in dem Byte Anfangsadresse + AD. 


Sprites 


(VIC=53248, NR=Spritenummer (0 bis 7)) 

Breite verdoppeln 

POKE VIC+29,PEEK(VIC+29) OR 2tNR_ 

Höhe verdoppeln 

POKE VIC+23,PEEK(VIC+23) OR 2t NR_ 

Kollision feststellen 

PEEK(VIC+30):POKE VIC+30,0 

(die Bits der beiden kollidierten Sprites sind gesetzt; in 

VIC+30 muß (!) anschließend der Wert 0 gePOKEd werden, 

da diese »Koliisionsspeicherzelle« nicht automatisch 

gelöscht wird!)._ 

Multicolor-Sprite 

Einschalten: POKE VIC+28,PEEK(VIC+28) OR 2t NR 
Spritefarben 

Definieren: POKE VIC+39+NR,Farbcode_ 

Sprites einschalten 

POKE VIC+21,PEEK(VIC+21) OR 2tNR_ 

Sprites ausschalten 

POKE VIC+21,PEEK(VIC+21) AND 255-2INR._ 

X-/Y-Koordinaten 

Festlegen durch POKE VIC+2*NR,X:POKE VIC+2*NR 
+1Y 


154 


SONDERHEFT 19 




















C64 


TIPS & TRICKS 


Die »Sprite-POKEs« werden verständlicher, wenn Sie ein 
wenig über den Umgang des C64 mit Sprites erfahren. Bis 
zu acht Sprites können gleichzeitig verwaltet werden. 
Jedes Sprite bekommt eine Nummer zwischen 0 und 7. Für 
eine Sprite-Funktion ist meist ein Register des VIC-Chips 
zuständig, zum Beispiel Register 29 für die Verdoppelung 
der Sprite-Höhe. Um ein Register anzusprechen, müssen 
Sie die Registernummer zur Basisadresse des VIC-Chips 
addieren: 

53248 (Basisadresse) + 29 (Höhen-Register) = 53277 
Die Speicherzelle 53277 beeinflußt also die Sprite-Höhe. 
Um gezielt ein bestimmtes Sprite ansprechen zu können, 
ist bei fast allen für die Sprites zuständigen Registern je ein 
Bit einem Sprite zugeordnet. 

Bit 0 Sprite Nummer 0 
Bit 1 Sprite Nummer 1 


Bit 7 Sprite Nummer 7 

Um nun gezielt die Höhe von Sprite Nummer 5 zu verdop¬ 
peln, ohne auch alle anderen Sprites zu beeinflussen, muß 
Bit 5 von Register 53248 gesetzt werden. Gesetzt bezie¬ 
hungsweise gelöscht werden Bits mit Hilfe der logischen 
Operatoren OR (Setzen) und AND (Löschen). Das folgende 
Schema zeigt, wie einzelne Bits gezielt manipuliert werden 
Bit NR setzen POKE X,PEEK(X) OR 2t NR 
Bit NR löschen POKE X,PEEK(X) AND 255-(2tNR) 

Zur Verdoppelung der Höhe eines Sprites finden Sie in 
der Tabelle den POKE: 

POKE VIC+29,PEEK(VIC+29) OR 2t NR 
NR ist hierbei die Spritenummer (0 bis 7), VIC die Basis¬ 
adresse des VIC-Chips (53248). Um die Höhe von Sprite 3 
zu verdoppeln, setzen Sie einfach das entsprechende Bit 
Nummer 3 mit der Anweisung S4CR or 

POKE 53248+29,PEEK(53248+29) OR 213 
Die Verdoppelung können Sie jederzeit rückgängig 
machen, indem Sie dieses Bit wieder löschen 
POKE 53248+29,PEEK(53248+29) AND 255-2t3 
Dieser kleine »Ausflug« sollte verdeutlichen, wie die 
Inhalte der Sprite-Register vom C64 interpretiert werden. 
Zum Umgang mit Sprites halten Sie sich bitte einfach an die 
POKE-Liste. Die Anwendung dürfte problemlos sein, nach¬ 
dem Ihnen nun die Bedeutung der Variablen VIC und NR 
bekannt ist. 

Sound 


(SID=54272; alle Angaben beziehen sich auf Stimme 1; für 
Stimme 2 zur angegebenen Adresse den Wert 7 addieren, 
für Stimme 3 den Wert 14)._ 

Gesamtlautstärke: 

Für alle Stimmen POKE SID+24,X (X zwischen 0 und 15). 
Hüllkurve: 

DECAY- und ATTACK-Wert festlegen POKE SID+5.X 
SUSTAIN- und RELEASE-Wert festlegen POKE SID+6.X 

Puls-Pause-Verhältnis 

POKE S!D+2,LB:POKE SID+3,HB (LB/HB Low- und High- 
Byte der Pulsbreite)._ 

Schwingungsform 

POKE SID+4,PEEK(SID+4) OR 2TI 

(1=4—Dreieck; 1=5—Sägezahn; 1=6—Rechteck; 

1=7—Rauschen)._ 

Tonhöhe: 

POKE SID,HB:POKE SID+1.LB 

HB/LB High- und Low-Byte der gewünschten Tonhöhe 
(siehe Tabelle im Handbuch). 


Programmschutz 


Ändern von Programmzeilen verhindern 

POKE 813,2_ 

Basic-Programm zerstören 

POKE 776,1_ 

LIST sperren 

POKE 775,200_ 

LIST wieder zulassen 

POKE 775,167_ 

Rechner nimmt keine Befehle mehr an 

POKE 120,2_ 

RESET nach Programmende 

POKE 768,143_ 

RESET bei LIST-Anweisung 

POKE 774,226: POKE 775,252_ 

RESET bei Drücken der RESTORE-Taste 

POKE 792,226: POKE 793,252_ 

RESET bei SAVE-Anweisung 

POKE 818,226:POKE 818,165_ 

Speichern verhindern 

POKE 801,0:PQKE 802,0:PQKE 818,165_ 

Sperren von Tastatureingaben 

POKE 649,0_ 

Wiederzulassen von Tastatureingaben 

POKE 649,10_ 

STOP-Taste ausschalten 

POKE 788,52_ 

STCP Taste wieder einschalten 

POKE 788,49_ 

STOP- und RESTORE-Taste ausschalten 

POKE 792,193_ 

STOP- und RESTORE-Taste wieder einschalten 
POKE 792,71_ 

Die angegebenen POKEs sind Ihnen sicher immer wie¬ 
der von Nutzen bei der Programmierung, wobei es egal ist, 
ob Sie Basic oder Assembler verwenden. Bei manchen 
POKEs ist jedoch Vorsicht geboten, da sie das vorhandene 
Programm zerstören können. Am besten, Sie testen die 
verschiedenen POKEs vor dem Einsatz im Programm, um 
böse Überraschungen zu vermeiden. 

(Said Baloui/rb) 
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TIPS & TRICKS 


C64 


Wie von Geisterhand... 


Beim C64 gibt es die Möglichkeit, Programme 
nach dem Laden automatisch starten zu lassen. 
Sie ersparen sich so die Eingabe von RUN. 

W enn ein Programm mit einem Autostart versehen 
wurde, genügt die Eingabe von LOAD " Name" ,8,1, 
um das Programm automatisch laden und starten 
zu lassen. Dazu wird auf der Diskette ein kleines Programm 
erzeugt, das automatisch startet, dann Ihr eigentliches Pro¬ 
gramm nachlädt und wiederum startet. Als erstes müssen 
Sie aber das Listing 1 mit Hilfe des MSE (siehe Seite 159) 
abtippen und auf einer Diskette speichern. Zur Anwendung 
gehen Sie so vor: 

1. LOAD "AUTOSTART",8,1 : NEW 

2. Laden Sie jetzt das Programm, das Sie mit einem Auto¬ 
start versehen wollen. Einzige Bedingung: Es muß sich 
mit RUN starten lassen. 


3. Überlegen Öie sich jetzt zwei Programmnamen: einen 
für das Ladeprogramm und einen für das neue Haupt¬ 
programm (zum Beispiel PACMAN und PAC.MAIN). 

4. Bei diesem Autostart haben Sie zusätzlich die Möglich¬ 
keit, Ihr Programm auf Diskette verschlüsseln zu lassen. 
Suchen Sie sich daher noch einen beliebigen Code zwi¬ 
schen 1 und 255 aus. Wenn Sie Ihr Programm nicht ver¬ 
schlüsseln wollen, wählen Sie Code 0. 

5. SYS 49152,Code," Hauptprogrammname"," Ladername " 
(Beispiel: SYS 49152,200," PAC.MAIN"," PACMAN") 

6. Ihr Programm wird nun neu auf Diskette gespeichert. 
Fertig! Wenn Sie nun LOAD "Ladername",8,1 (also zum 

Beispiel LOAD "PACMAN",8,1) eingeben, wird PACMAN 
automatisch geladen und gestartet. Zusätzlich wird Ihr Pro¬ 
gramm noch mit einem Schutz gegen Drücken von 
< RUN/STOP RESTORE> versehen. 

(Christoph Dautzenberg/tr) 
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Listing 1. 

»Autostart« 
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C64 


EINGABEHILFE 


Wie gebe ich Programme ein? 


Es ist zweifellos eine faszinierende Sache: Ein 
Programm abzutippen und dann das Ergebnis zu 
bewundern. Hier erfahren Sie, was Sie beim Ein¬ 
tippen von Listings beachten müssen und mit 
welchen Tricks Sie zum »Tipp-Profi« werden. 

J eder frischgebackene Computer-Besitzer kommt ein¬ 
mal an den Punkt, an dem er erkennt, daß das »Elek¬ 
tronik-Wunder« C 64 ohne entsprechende Fütterung 
(sprich Programme) so dumm wie ein kleiner Taschenrech¬ 
ner ist. Dann gibt es zwei Möglichkeiten: Entweder man 
kauft sich fertige Programme für teures Geld, oder man 
geht zum nächsten Zeitschriftenhändler und besorgt sich 
das 64’er-Magazin. Da Sie den zweiten Weg gewählt haben 
(sonst würden Sie diesen Artikel nicht lesen) möchten wir 
Ihnen gratulieren. Zweifellos verspüren Sie beim Lesen der 
Programmbeschreibungen sofort das Bedürfnis, diese 
herrlichen Programme abzutippen. 

Daraufhin folgt die Ernüchterung: »...verwenden Sie zur 
Eingabe bitte den MSE...« oder »...bitte mit dem Check¬ 
summer eingeben...«. Was sind denn das für Wunderpro¬ 
gramme? Kann man die irgendwo kaufen? Nein, der 
Checksummer und der MSE sind von uns entwickelte Pro¬ 
gramme, die Ihnen helfen sollen, unsere Listings fehlerfrei 
abzutippen (als »Listing« wird im folgenden ein abgedruck¬ 
tes Programm bezeichnet). Denn ein fehlerfreies Abtippen 
ist die Voraussetzung für ein korrektes Funktionieren des 
Programms. nr 

Also: Ihr erster Schritt soll sein, den Checksummer und 
den MSE auf Seite 159 abzutippen. Doch wie macht man 
das eigentlich? 

Das Allerwichtigste, was Sie sich einprägen müssen, ist 
die Bedeutung der RETURN-Taste (ganz rechts auf der 
Tastatur des C 64): Wenn Sie auf der Tastatur etwas einge¬ 
ben, so ist das in etwa so, als ob Sie dem Computer einen 
Brief schreiben. Die Bildschirmzeile(n), auf der Sie gerade 
Buchstaben und Zeichen eintippen, ist das Briefpapier. Der 
Computer kümmert sich erst dann um das, was Sie schrei¬ 
ben, wenn Sie die RETURN-Taste drücken. Sie können das 
etwa damit vergleichen, daß Sie den eben geschriebenen 
»Brief« durch die RETURN-Taste an den Computer »ab¬ 
schicken«. Erst dann versucht der C 64 das, was Sie ihm 
mitteilen wollen, zu verstehen, zu »interpretieren«. Also: 
Nach einer Eingabe immer < RETURN > drücken. 


Das Zweitwichtigste, was Sie sich merken müssen, ist, 
daß der C 64 keine »Briefe« annimmt, die länger als zwei 
Bildschirmzeilen sind! Das bedeutet: Wenn Sie etwas ein¬ 
tippen, und Sie überschreiten mit dem »Cursor« (der blin¬ 
kenden Schreibmarkierung) das Ende der zweiten Zeile, 
dann »vergißt« der C 64 alles, was Sie in den beiden vorher¬ 
gehenden Zeilen geschrieben haben. Er betrachtet dann 
nach dem Drücken der RETURN-Taste die dritte Zeile als 
das aktuelle »Briefpapier«. Das ist ganz besonders wichtig, 
wenn Sie ein Basic-Programm (mit den Zahlen (= »Zeilen¬ 
nummern«) am Anfang jeder Zeile) eintippen. Sobald der 
Cursor in der dritten Schreibzeile steht, wird es Probleme 
geben. Also: Beim Eintippen von Listings darauf achten, 
daß der gerade eingegebene Text nicht länger als zwei Bild¬ 
schirmzeilen ist. Falls es nicht anders geht, können Sie die 
Freiräume zwischen den einzelnen Basic-Befehlen ersatz¬ 
los weglassen (diese Freiräume werden übrigens auch 
»Spaces« genannt). Unsere Listings enthalten diese Spa¬ 
ces nur, weil das Programm dadurch wesentlich übersichtli¬ 
cher wird. 

Basic-Programme 


Nun wird es interessant: Sie beginnen, ein Basic-Listing 
abzutippen. Wichtig ist jetzt vor allem, daß Sie die Zeilen¬ 
nummern am Anfang jeder Programmzeile nicht verges¬ 
sen. Wenn Sie beim Eintippen auf geschweifte Klammern 
stoßcr- ((CLRj) dürfen Sie das, was innerhalb der Klammern 
steht, nicht mit eintippen! Statt dessen drücken Sie die dort 
angegebenen Tasten. Also: In einem unserer Listings steht 
zum Beispiel: 

10 PRINT Ä (CLR,3D0WN] HALLO!" 

Beim Eintippen müssen Sie folglich nach dem Anfüh¬ 
rungszeichen zuerst die Taste < CLR > drücken. Wenn Sie 
diese Taste betrachten, wird Ihnen auffallen, daß die CLR- 
Funktion oben auf der Taste steht. Das bedeutet, daß Sie 
diese Taste zusammen mit der SHIFT-Taste drücken müs¬ 
sen, um die CLR-Funktion zu erreichen. Auf dem Bild¬ 
schirm muß jetzt nach dem Anführungszeichen ein dunkles 
Herz auf hellem Grund erscheinen. Man nennt diesen Dar¬ 
stellungsmodus auch »revers« oder »invers«. Als nächstes 
müssen Sie dreimal die »Down«-Taste drücken. Das ist die 
»Cursor-nach-unten«-Taste. Neben dem inversen Herz¬ 
chen müssen jetzt drei inverse Qs erscheinen. 


EINEN MOMENT, BITTE ... 

CHECKSUMMER AKTIUIERT. 

AUSSCHALTEN : POKEl,55 
ANSCHALTEN : P0KE1,53 
RE AD V 

16 PRiNT •■HALLO" 

■ 


»Checksummer«, die Basic-Eingabehilfe. Links oben sehen 
Sie die Prüfsumme für die Programmzeile unten. 



Das MSE-Programm dient der leichten und fehlerfreien Ein¬ 
gabe von Maschinensprache-Listings. 
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C64 


Wir wollen nun untersuchen, was passiert, wenn Sie die¬ 
ses Mini-Programm mit »RUN« starten: Der C 64 »liest« den 
PRINT-Befehl und erkennt, daß er den folgenden Text auf 
dem Bildschirm ausgeben soll. Als erstes soll er den Bild¬ 
schirminhalt löschen (CLR) und dann drei Zeilen weiter 
unten (3DOWN) den Text »HALLO« ausdrucken. Wir haben 
nun schon einen wichtigen Punkt gelernt: Sobald wir ein 
Anführungszeichen eingeben, werden alle »Steuerfunktio¬ 
nen« (Cursor-Bewegungen, Bildschirm löschen, die Farb¬ 
wahl-Tasten etc.) nicht mehr direkt ausgeführt, sondern als 
»Steuerzeichen« in den Programmtext übernommen. Die¬ 
ser besondere Modus wird »Anführungszeichen-Modus« 
genannt. 

Was aber tun, wenn wir uns innerhalb von Anführungs¬ 
zeichen vertippt haben und dringend die »Cursor-nach- 
Iinks«-Taste zum Korrigieren benötigen? Der C 64 würde 
diese Tasten-Funktion ja nicht ausführen, sondern das ent¬ 
sprechende Steuerzeichen ausgeben. Sie können das 
leicht ausprobieren, wenn Sie einfach mal ein Anführungs¬ 
zeichen eingeben, und dann versuchen, mit dem Cursor 
ein Zeichen nach links zu fahren. Aus diesem Anführungs¬ 
zeichen-Modus führen zwei Wege nach draußen: 

1. Wir geben noch ein Anführungszeichen ein und schalten 
dadurch den Modus aus. Das eventuell störende zweite 
Anführungszeichen können wir ja wieder löschen. Haupt¬ 
sache, der Cursor macht wieder das, was wir wollen. 

2. Wir drücken <SHIFT> und <RETURN>. Dadurch 
wird der Cursor an den Anfang der nächsten Zeile gesetzt, 
ohne daß das gerade Eingegebene vom C 64 beachtet 
wird. Als Nebeneffekt des Ganzen wird der Anführungszei¬ 
chenmodus wieder gelöscht und der Cursor darf sich wie¬ 
der frei bewegen. 

Steuerzeichen 


Als kleine Übung können Sie ja einmal das Listing 1 abtip¬ 
pen. Es zeigt, wie man nur durch die Cursor-Steuerzeichen 
und einigen Strichen eine einfache, bewegte Grafik auf den 
Bildschirm zaubern kann. 

Doch nun zu ein paar allgemeinen Hinweisen: 

1. Wie löscht man eine Programmzeile? Ganz einfach: Wir 
geben nur die Nummer der fehlerhaften Zeile ein und 
drücken die RETURN-Taste. 

2. Wenn Sie ein Programm fertig eingetippt haben, ist das 
Allerwichtigste, daß Sie Ihre Arbeit unbedingt zuerst auf 
Diskette oder Kassette speichern! Denn wenn Sie noch 
irgendwo einen gravierenden Tippfehler gemacht haben, 
kann dies zum rettungslosen Absturz des Computers füh¬ 
ren. Und dann hilft nur noch das für Ihr Programm tödliche 
Aus- und wieder Einschalten des Computers. Also: Pro¬ 
gramme vor dem ersten Testlauf immer speichern! 

3. Was ist beim Speichern auf Diskette oder Kassette zu 
beachten? Bei Diskette ist es wichtig, daß Sie nach dem 
SAVE-Befehl einen Programmnamen (maximal 16 Zei¬ 
chen) angeben. Ansonsten meldet der Computer einen 
»missing filename error«. Bei Datasette können Sie den 
Programmnamen weglassen. Im Fachjargon wird übrigens 
ein Programm als »File« bezeichnet. Deswegen werden Sie 
häufig auch »Filename« statt »Programmname« lesen. 

4. Wenn in einem Basic-Programm Zeilen Vorkommen, die 
vom Inhalt her identisch oder zumindest stark ähnlich sind, 
gibt es einen kleinen Trick: Um sich Tipparbeit zu sparen, 
genügt es, wenn wir die Zeile einmal auf den Bildschirm 
schreiben, die RETURN-Taste drücken und dann nur noch 
die Zeilennummer durch die neue überschreiben, um die 


10 PRINT" {CLR} 11 s AS= " {HOME,11 DOWN, 18RIGHT> " <049> 
20 PRINT A*"CDOWN,SPACE,UP,LEFT>aiDOWN,RVS 


DN,SPACE,RVOFF >" <143> 
30 GOSUB 200 <238> 
40 PRINT A*" = " <166> 
50 GOSUB 200 <002> 
60 PRINT A*"{RIGHT,SPACEJH" <002> 
70 GOSUB 200 <022> 
B0 PRINT A*“<2RIGHT,SPACE,DOWN,LEFT>i" <123> 
90 GOSUB 200 <042> 
100 PRINT A*"<2RIGHT,DOWN,SPACE,DOWN,LEFT> 

&" <1GT4> 
110 GOSUB 200 <062> 
120 PRINT A*"C2RIGHT,2DOWN,SPACE,2LEFT> = " <249> 
130 GOSUB 200 <082> 
140 PRINT A*"(2DDWN,RIGHT,SPACE,2LEFT>ü" <180> 
150 GOSUB 200 <102> 
160 PRINT A*"{2D0WN,SPACE,UP,LEFT>*" <066> 
170 GOSUB 200 <122> 
180 GOTO 20 <110> 
200 FOR 1=1 TO 100:NEXT:RETURN <042> 


© 64'er 

Listing 1. Ein Beispiel für Steuerzeichen in Basic-Listings. 
Bitte beachten Sie die Hinweise im Text. 


anderen Zeilen zu erhalten. Ein Beispiel: Betrachten wir 
uns in Listing 1 die Zeilen 30, 50, 70 und so weiter. Alle 
haben den gleichen Inhalt. Es genügt, wenn wir die Zeile 
einmal auf den Bildschirm schreiben, die RETURN-Taste 
drücken und dann einfach die Zeilennummer 30 durch eine 
50, 70, 90 etc. überschreiben (< RETURN > nicht verges¬ 
sen). Wenn wir jetzt »LIST« eingeben, sehen wir, daß der C 
64 alle Zeilen angenommen hat. Dies ist eine äußerst effek¬ 
tive Methode, die man sich unbedingt merken sollte. 

So, Sie haben jetzt (fast) alles gelernt, was zum fehler¬ 
freien Abtippen eines Programms wichtig ist. Man könnte 
nun noch sämtliche Fehlermeldungen des C 64 aufzählen 
und zu ider Meldung mögliche Fehlerquellen, Tips zum 
Beheben und so weiter geben. Das würde jedoch den Rah¬ 
men dieses Artikels bei weitem sprengen! 

Das Eintippen von Maschinensprache-Programmen ist 
dank unseres MSE-Programms auf Seite 159 schon deut¬ 
lich einfacher. Wenn Sie die Bedienungsanleitung zum 
MSE auf Seite 159 genau beachten, sind Tippfehler fast 
ausgeschlossen. Wenn Sie ein solches MSE-Listing voll¬ 
ständig eingetippt und gespeichert haben, sind lediglich 
einige Regeln zu beachten: 

1. Maschinensprache-Programme müssen immer (!) mit 
dem Zusatz »,1« zum LOAD-Befehl geladen werden. 
Beispiel: 

LOAD * LISTING* ,8,1 (Diskette) oder LOAD" LISTING " ,1,1 
(Kassette). Man nennt dies »absolut« laden. Es hat etwas 
mit der Stelle im Speicher zu tun, an die das Programm 
geladen werden soll. 

2. Maschinensprache-Programme werden fast immer 
durch einen SYS-Befehl und nicht durch »RUN« gestartet. 
Es gibt eine Ausnahme: 

Manche Programme haben eine Basic-Zeile mit dem 
entsprechenden SYS-Befehl zum Starten. Diese Pro¬ 
gramme werden mit »RUN« aktiviert. Sie erkennen sie an 
der Startadresse »0801« im MSE-Listing. 

3. Bei Maschinensprache-Programmen ist es ganz beson¬ 
ders wichtig, daß nicht zwei Programme gleichzeitig im sel¬ 
ben Speicherbereich liegen dürfen. Der jeweils verwen¬ 
dete Bereich steht in der Kopfzeile des MSE-Programms. 

4. Die Startadresse hinter dem SYS-Befehl ist für das Pro¬ 
gramm »lebenswichtig«. Wenn Sie sich hier vertippen, kann 
unter Umständen der Computer vollständig abstürzen. 

Damit wären wir am Ende dieser kleinen »Einführung in 
die Kunst des Programme-Abtippens« angelangt. Wir hof¬ 
fen, daß wir Ihnen in diesem Artikel eine Menge nützlicher 
Hinweise geben konnten. Und verzagen Sie nicht: Jeder 
»syntax error« hat einen auffindbaren Grund! (tr) 
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Checksummer 
V3 und MSE 

Diese beiden Programme sind unentbehrlich 
beim Abtippen unserer Listings. Sie helfen 
Tippfehler vor allem bei Maschinenprogram¬ 
men zu vermeiden und sparen eine Menge Zeit. 

N obody is perfect. Jeder Computer-Fan, egal ob bluti¬ 
ger Anfänger oder ausgefuchster Profi, macht beim 
Abtippen von Programmen Tippfehler. Diese Fehler 
später zu finden, kann ein langwieriges Unterfangen sein. 

Deshalb haben wir für Sie die Programme »Checksum¬ 
mer V3« und »MSE« (MaschinenSpracheEditor) entwickelt. 
Der Checksummer ist für Basic-Programme und der MSE 
für Maschinensprache-Listings zuständig. 

Der Checksummer 


Zuerst einmal müssen Sie das Checksummer-Programm 
(siehe Listing 1) abtippen. Dabei sollten Sie äußerst sorgfäl¬ 
tig Vorgehen, vor allem bei den Zahlen in den DATA-Zeilen 
20 bis 30. Wenn Sie trotzdem noch einen Tippfehler 
gemacht haben, meldet sich das Programm Später mit 
einem entsprechenden Hinweis. Wenn Sie fertig sind, spei¬ 
chern Sie das Programm auf Diskette oder Kassette. 

Jetzt geht es los: 

1. Starten Sie den Checksummer durch die Eingabe von 
»RUN« und das Drücken der RETURN-Taste. 

2. Wenn die Meldung »Checksummer aktiviert...« auf dem 
Bildschirm erscheint, haben Sie keinen Tippfehler 
gemacht und der Checksummer ist nun eingeschaltet. 

3. Zum Löschen des Basic-Programms geben Sie bitte 
»NEW« ein. Keine Angst, der Checksummer selbst wird 
dadurch nicht gelöscht. 

4. Nun können wir den Checksummer testen. Geben Sie 
bitte folgende Zeile ein und drücken Sie die RETURN-Taste: 
1 REM 

In der linken oberen Bildschirmecke sehen Sie nun die 
Prüfsumme über die eben eingegebene Basic-Zeile. Sie 
muß <63> lauten. Dem Checksummer ist es übrigens 
egal, ob Sie »1 REM« oder »1REM« eintippen. Nur innerhalb 
von Anführungszeichen ist die richtige Anzahl an Leerzei¬ 
chen wichtig. Diese Prüfsummen erscheinen (sofern Sie 
den Checksummer eingeschaltet haben) immer dann, wenn 
Sie eine Basic-Zeile eintippen und dann die RETURN-Taste 
drücken. In der 64’er finden Sie die Prüfsumme immer am 
Ende jeder Programmzeile. 


10 PRINT''CHECKSUMMER FUER C 64" 

11 PRINT:PRINT"EINEN MOMENT, BITTE ..." 

12 FOR 1=828 TO 864:READ A:POKE I,A:PS=PS+ 

A:NEXT I 

13 IF PS05765 THEN PRINT "TIPPFEHLER IN DE 
N ZEILEN 20 BIS 22":END 

14 SYS 828:PS=0:FOR 1=58464 TO 58583:READ 
A:POKE I,A:PS=PS+A:NEXT I 

15 IF PS016147 THEN PRINT "TIPPFEHLER IN D 
EN ZEILEN 22 BIS 30":END 

16 POKE 1,53:POKE 42289,96:POKE 42290,228 

17 PRINT"CHECKSUMMER AKTIVIERT." 

18 PRINT:PRINT" AUSSCHALTEN : POKE1.55 ODE 
R"SPC(27)”<RUN/STOP+RESTORE>" 

19 PRINT:PRINT" ANSCHALTEN : POKE1.53“ 

20 DATA 169,0,133,254,162,1,189,93,3,133,2 
55,160,0,177,254 

21 DATA 145,254,136,208,249,230,255,165,25 
5,221,95,3,208,238,202 

22 DATA 16,230,96.160,224,192,0,160,2,169, 
0,170,133.254,177 

23 DATA 95,240,40,201,32,208,3,200,208,245 
.133,255,138,41,7 

24 DATA 170,240,14,72,165,255,24,42,105,0, 

202.208.249.133.255 

25 DATA 104,170,232,165,255.24,101,254,133 
,254,76,111,228,192.4 

26 DATA 48,219,198,214,165.214,72,162,3,16 
9,32,157,1,4,189 

27 DATA 212,228.32,210,255,208,12,0,92,72, 
32,201,255,170,104 

28 DATA 144,1,138,96,202,16,228,166,254,16 
9,0,32,205,189,169 

29 DATA 62.32,210,255,104,133.214,32,108,2 

29.169.141.32.210.255 

30 DATA 76,128,164,9,60,18,19 
0 64'er 

Listing 1. Der »Checksummer 64 V3« für Basic-Listings 


5 PRINT CHRS(14) <242> 

10 PRINT"<CLR>" <254> 

20 PR I NT “ a »>.««.»»«»»««g " <130> 

30 *-* < I NT " C4D0WN , 2SPACE TUEST {SPACE , BLUE , 6SP 

ACE>" <022> 

40 PRINT"ISSBSSBOTOTOTOTSBSOTOTSSOTSS" <10B> 


© 64'er 

Bild 1. Die Bedeutung der Steuerzeichen 
wird im nachfolgenden Text erklärt 

In Zeile 10 müssen Sie nach den Anführungsstrichen die 
Tasten <SHIFT CLR/HOME> drücken und nicht die 
Klammern mit dem Wort CLR eingeben. In Zeile 20 
drücken Sie nach den Anführungsstrichen die CBM- 
Taste und den Buchstaben < Q >, gefolgt von mehreren 
SHIFT- und Stern-Tasten und zum Schluß die CBM- 
Taste und den Buchstaben <W>. In Zeile 30 ist es vier¬ 
mal die CURSOR-abwärts-Taste, gefolgt von zweimali¬ 
ger Leertaste, dann < SHIFT T> und normal EST, zum 
Schluß noch einmal die Leertaste, die Farbtaste Blau 
<CTRL 7> und sechsmal die Leertaste. Zeile 40 
besteht lediglich aus mehreren Grafikzeichen, die mit 
der CBM-Taste und <B> erzeugt werden. 


CTRL steht für Control-Taste, so bedeutet |CTRL+A|, daß Sie die Control-Taste und die Taste »A« drücken müssen. 

Im folgenden steht: 

IDOWN] 

Taste neben rechtem Shift, 

|SPACE| 

Leertaste 

(RVSON! 

Control-Taste 8 9 


Cursor unten 

(SHIFT-Spacei 

Shift-Taste 8 Leertaste 

(RVOFF] 

Control-Taste 8 0 

IUP! 

Shift-Taste & Taste neben 

(Fl) bis (F8J 

Funktionstasten 

(ORANGE! 

Commodore-Taste 8 1 


rechtem Shift; Cursor hoch 

(RETURNI 

Return-Taste 

(BROWN! 

Commodore-Taste 8 2 

ICLR] 

Shift-Taste & 2. Taste 

(BLACK! 

Control-Taste 8 1 

(LIG.REDI 

Commodore-Taste 8 3 


ganz rechts oben 

(WHITE! 

Control-Taste 8 2 

(GREY 1) 

Commodore-Taste 8 4 

IINSTj 

Shift-Taste 8 Taste 

IRED] 

Control-Taste 8 3 

(GREY 2J 

Commodore-Taste 8 5 


ganz rechts oben 

(CYAN! 

Control-Taste 8 4 

(LIG.GREENI 

Commodore-Taste 8 6 

IHOMEj 

2. Taste von ganz rechts oben 

(PURPLE! 

Control-Taste 8 5 

(LIG.BLUEI 

Commodore-Taste 8 7 

IDELj 

Taste ganz rechts oben 

(GREEN) 

Control-Taste 8 6 

(GREY 3| 

Commodore-Taste 8 8 

(RIGHT! 

Taste ganz rechts unten 

(BLUEj 

Control-Taste 8 7 

Tabelle 1. 


ILEFT) 

Shift-Taste & Taste unten rechts 

(YELLOW] 

Control-Taste 8 8 

Die Steuerbefehle in den Listings 
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Diese Zahlen dürfen Sie NICHT mit abtippen. 

Als Beispiel sehen Sie Bild 1. Am rechten Rand jeder 
Spalte sehen Sie die Prüfsummen in eckigen Klammern. 

Damit sind wir beim zweiten wichtigen Punkt: Sehen Sie 
sich die Zeile 240 von Listing 2 genauer an. Nach dem ersten 
Anführungszeichen nach dem PRINT-Befehl sehen Sie eine 
geschweifte Klammer (). Immer, wenn Sie in einem unserer 
Listings diese Klammern sehen, dürfen Sie das, was inner¬ 
halb der Klammern steht, nicht eintippen. Sie müssen die 
entsprechende Taste drücken. Beispiel: 

10 PRINT 'fCLRj' 


bedeutet: Nach dem Anführungszeichen die »Bildschirm-Iö- 
schen«-Taste drücken (< SHIFT CLR/HOME>). In Tabelle 1 
sehen Sie eine Zusammenfassung aller möglichen Steuer¬ 
tasten mit dem entsprechenden Klartext. 

Weiterhin sehen Sie in Listing 2 (MSE) in Zeile 341 ein 
unterstrichenes »O« nach dem »P«. Das bedeutet, daß Sie 
ein »O« zusammen mit der SHIFT-Taste drücken müssen, 
also <SHIFT 0>. Wenn ein Zeichen »überstrichen« ist, 
müssen Sie dieses zusammen mit der CBM-Taste einge¬ 
ben. Die CBM-Taste befindet sich ganz links unten auf der 
Tastatur und hat die Aufschrift »C=«. 


100 REM DIESES PROGRAMM ERZEUGT DEN <210> 

110 REM MSE VI.1 AUF DISKETTE. <039> 

120 REM BESITZER EINER DATASETTE <178> 

130 REM MUESSEN DIE '8’ AM ENDE VON <145> 

140 REM ZEILE 343 IN EINE ’l’ AENDERN! <176> 

150 REM <212> 

230 IF PEEK(44)<>32 THEN PRINT"CCLR}SIE HA 
BEN VERGESSEN, DIE POKES EINZUGE- BEN! 

" : END <050> 

240 PRINT''CCLR}" i :DIM H(75):FOR 1=0 TO 9 <042> 

250 H(4B+I)=I:H(65+I)=I+10:NEXT:Z=1000 <136> 

260 FOR 1=2048 TO 3755 STEP 20:PRINT"CHOME 

3ICH LESE ZEILE:"Z <253> 

261 FOR N=0 TO 19 : READ A$=IF LEN(A$)<>2 TH 

EN '900 <062> 

262 IF PEEK(63)+PEEK(64)*256<>Z THEN 800 <011> 

270 H=ASC<LEFTS(A$,1> >:L=ASC(RIGHTS(A$■1)> <199> 
280 D=H(H)*16+H(L>:S=S+D = POKE I+N.D <165> 

290 NEXT : READ V:IF SOV THEN 900 <139> 

300 S=0=Z=Z+1 : NEXT : R=PEEK(2111J:H=PEEK(210 

6) <126> 

301 POKE 53280,R:POKE 53281,H=POKE 646,R:P 
RINT"CCLRODIE DATA-ZEILEN SIND FEHLERF 

REI!“ <080> 

302 PRINT“SIE KOENNEN NUN DIE FARBEN DES M 

SE“ <209> 

303 PRINT''EINSTELLEN. ":PRINT"C2DOWN, SPACE, 

RVSON1DRUECKEN SIE <1>, <2> ODER <9> <205> 

304 PRINT"CDOWN,2SPACE}<1> - RAHMEN-/SCHRI 

FTFARBE <013> 

305 PRINT"C2SPACE><2> - HINTERGRUNDFARBE <233> 

306 PRINT"CDOWN,2SPACEJ<9> - FARBEN UEBERN 

EHMEN <158> 

307 PRINT“C2DOWN5FARBE <1>="R:PRINT"FARBE 

<2>:"H <066> 

308 GET A = IF A=0 THEN 308 <210> 

309 IF A=1 THEN R=(R+1)AND 15 <098> 

310 IF A=2 THEN H=(H+1)AND 15 <086> 

311 IF A=9 THEN 340 <217> 

312 GOTO 301 <034> 

340 POKE 2106,H:POKE 2111,R <153> 

342 POKE 631,19 = POKE 632,13:POKE 198,2 <135> 

343 PRINT"CCLR3SAVE"CHR$<34)"MSE V1.1"CHR$ 

(34)",8 <091> 

344 POKE 43,1:POKE 44,8:POKE 45,172=POKE 4 

6,14:END <140> 

800 PRINT"CCLR,RVSON>SIE HABEN ZEILE''Z"CLE 

FT,SPACEJVERGESSEN:":A=PEEK(646)AND 15 <124> 
810 POKE 646,PEEKt53281)AND 15:PRINT"LIST" 

Z-2“-"Z+2 = POKE 646,A <224> 

820 GOTO 920 <082> 

900 PRINT"CCLR,RVSONOSIE HABEN EINEN TIPPF 

EHLER GEMACHT:":A=PEEK(646)AND 15 <154> 

910 POKE 646,PEEKt53281)AND 15:PRINT"LIST” 

Z=POKE 646,A <173> 

920 POKE 631,19:POKE 632.17=POKE 633,13:PO 

KE 198,3:END <126> 

1000 DATA 00,0B,08,0A,00,9E,32.30,36,31,00 

,00,00,A2,08,A9,36,85,A4,A9, 1247 <119> 

1001 DATA 08,85,A5,A9,00,85,A6,A9,B0,85,A7 

,A0,00,Bl,A4,91,A6,C8,D0,F9, 2888 <054> 

1002 DATA E6,A5,E6,A7,CA,D0,F2,A9,36,85,01 

,4C,00,B0,20,D1,B1,A9,00,8D, 2781 <096> 

1003 DATA 21,D0,A9,0F.8D,20,D0,8D.86,02,A0 

,B3,A9,74,20,FF.B1,A0,B3,A9, 2679 <089> 

1004 DATA B9.20,FF,Bl,A0,00,20,CF,FF.99,01 

,02,C8,C9,0D,D0,F5,88,F0,D2, 2912 <217> 

1005 DATA C0.11,90,02,A0,10,8C,00,02,20,EA 

,B1,A0,B3,A9,CF,20,FF,B1,20, 2327 <045> 

1006 DATA 8E.B4.85,FC,85,62.20,8E,B4,85,FB 

,85,61,20,A7,B4,D0,20,A0,B3, 2864 <199> 

1007 DATA A9,E5,20,FF,B1,20,8E,B4,85,60,20 


,8E,B4,85,5F,20,A7,B4,D0,0A, 2624 <091> 

1008 DATA A5.61,C5,5F,A5,62,E5,60.90,06,20 

,43,B3,4C.3A,B0,A9,AA,A0,00, 2379 <167> 

1009 DATA EA,EA,E6,FB,D0,02,E6,FC,20,3F,B2 

,90,EF,4C.FB,B4,A2,02.86,58, 3190 <041> 

1010 DATA A9,A6,A0,9D,20,F2,Bl,20,E4,FF,F0 

,FB,C9,30,90,0C,C9,47,B0,08, 2970 <231> 

1011 DATA C9,3A,90,0B,C9,41.B0.07.C9,14,D0 

,0F,4C,0B,B1,20,D2,FF,A6,58, 2322 <121> 

1012 DATA 95,F7,C6,58,D0,D2,60,AE,8D,02,F0 

,26,C9 > 0C,D0,03,4C,0B,B6,C9 > 2685 <057> 

1013 DATA 13,D0,03,4C,8B,B5,C9.0D,D0,03,4C 

,BA,B4,C9,10,D0,03,4C.68,B5, 2282 <225> 

1014 DATA C9,0E.D0,06,20,5F.B4,4C,64,Bl,4C 

,92,B0,A5,F9.20,02,B1,0A,0A, 2132 <208> 

1015 DATA 0A,0A,85,F9,A5,F8,20,02,Bl,05,F9 

,60.C9,3A,90,02,69,08,29,0F, 1950 <092> 

1016 DATA 60,A6,59,E0,08.90,1F,A6.58,E0,02 

,B0,06,20,D2,FF,4C,8E,B0,C6, 2509 <188> 

1017 DATA 59,A0,14,A9,92,20,F2,Bl,CA.D0,FA 

,84,57.68,68,4C,8B,Bl,A6,D3, 2891 <197> 

1018 DATA E0,08,B0,03,4C,92,B0,20,D2,FF,A6 

,58,E0,02,90,09,C6,59,20,D2, 2468 <049> 

1019 DATA FF.C6,58,D0,F9,4C.8E,B0,48.4A,4A 

,4A,4A,20,59.Bl,68,29,0F,C9. 2419 <035> 

1020 DATA 0A,90,02,69,06,69,30,4C,D2,FF,A2 

,FC,9A,20,Dl,Bl,20,48,B2,20, 2261 <073> 

1021 LATA EA.Bl ,20.9F,B2,A5,FC,20,4E.B1 ,A5 

,FB,20,4E,Bl,20,ED,Bl,A9,3A, 2860 <148> 

1022 DATA A0,20,20,F2,B1,A9,00,85,59,20,8E 

.B0,20,ED,Bl.A4,59,20,EF,B0, 2530 <233> 

1023 DATA 91,FB,C8,84,59,C0,08,90,EC,20,10 

,B2.A9,12,20,D2,FF,20,8E,B0, 2657 <105> 

1024 DATA 20,EF,B0,C5,FF,F0,0D,20,43,B3.A9 

,14,A0,14,20,F2,B1,4C,A2,B1, 2665 <034> 

1025 DATA A9,92.20,D2,FF,20,33,B2,20.E0,B2 

.20,3F,B2.90,9F,4C,8B,B5,A9, 2648 <123> 

1026 DATA 93,20,D2,FF,A2,00,A9,03,9D,00,D8 

,9D,00,D9,9D,00.DA,9D,00,DB. 2476 <237> 

1027 DATA E8,D0,EF,60,A9,0D,2C,A9,20,4C,D2 

,FF,20.D2,FF,98,4C,D2,FF,20. 2965 <160> 

1028 DATA E4,FF,F0,FB,60,84,5D,85,5C,A0,00 

,Bl,5C,F0,06,20,D2,FF,C8.D0, 3100 <077> 

1029 DATA F6,60,A5,FB,85,5A,A0,00,84,5B,Bl 

,FB,18,65,5A,65,5A,90,02,E6. 2606 <156> 

1030 DATA 5B,06,5A,26,5B,C8,C0,08,90,EC,A5 

,5A,65,5B,85,FF,60,18,A5,FB, 2467 <219> 

1031 DATA 69,08,85,FB,90,02,E6,FC,60,A5,FB 

,C5,5F,A5,FC,E5,60,60,A0,B3, 3106 <183> 

1032 DATA A9,FB,20,FF,B1,A0,01,B9>00,02,20 

,D2,FF.CC,00.02,C8,90,F4,A9, 2692 <098> 

1033 DATA 14,ED,00.02,AA,20,ED,Bl,CA,D0,FA 

,A5,62,20,4E.B1,A5.61,20.4E, 2457 <060> 

1034 DATA Bl,20,ED,Bl,A5,60,20,4E,Bl,A5,5F 

,20,4E,Bl,EA,EA,EA,EA,EA,EA, 3122 <190> 

1035 DATA EA,EA,24,5E,10,01,60,A9,12,20,D2 

,FF,A2,28,20,ED,Bl,CA,D0,FA, 2703 <087> 

1036 DATA A9,92,4C,D2,FF,A5,D6,C9,16,B0,01 

,60,A9,A0,85,A4,A9,78,85,A6, 2945 <204> 

1037. DATA A9,04,85,A5,85,A7,A2,13,A0,27,B1 

,A4,91,A6,88,10,F9,CA,F0,19, 2671 <208> 

1038 DATA 18,A5,A4,69,28,85,A4,90,02,E6,A5 

,18,A5,A6,69,28,85,A6,90,E0, 2503 <251> 

1039 DATA E6,A7,4C,B6,B2.A9,91,4C,D2.FF,A9 

,0F,8D.18,D4.A9.00,8D,05,D4, 2776 <000> 

1040 DATA A9.F7.8D,06, D4.A9.il ,8D,04,D4,A9 

,32,6D,01,D4,A9,00.8D,00,D4. 2413 <126> 

1041 DATA A0,80,20,09,B3.A9,10,8D,04,04,60 

,A2,FF,CA,D0,FD,88,D0,F8,60, 2914 <240> 

1042 DATA A9,0F,8D,18,D4,A9,2D,8D,05,D4,A9 

,A5,8D,06,D4,A9,21,8D,04,D4, 2385 <119> 

1043 DATA A9,07,8D,01,D4,A9.05,8D,00,D4,A0 
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,FF,20,09,B3,A9,20,BD,04,D4, 2250 <078> 

1044 DATA A9.00.8D.01,D4,8D.00,D4.60,38.20 

.F0.FF.8A.48.98.48,18iA0i06. 2179 <175> 

1045 DATA A2,18.20.F0.FF.A0.B4.A9.0A.20.FF 

.Bl.20,12.B3.20.E4.FF.F0.FB. 2931 <093> 

1046 DATA A2.1D,A9.14,20.D2.FF,CA.D0.FA,68 

.A8.68.AA.18.4C.F0.FF.0D.0D. 2704 <088> 

1047 DATA 0D.20.20.20.20,20.20,20,4D,41,53 

,43,48,49,4E,45,4E.53,50,52, 1144 <216> 

1048 DATA 41,43,48,45,20,2D.20,45,44,49,54 

,4F,52,20,0D,0D,20,20,20.20. 1023 <038> 

1049 DATA 20,20,20,20,56,4F,4E,20,4E,2E,4D 

,41,4E,4E,20.26,20.44,2E,57, 1128 <206> 

1050 DATA 45,49,4E,45,43,4B,00,0D,0D,0D,20 

,20,20,50,52,4F,47,52,41,4D. 1102 <117> 

1051 DATA 4D.4E.41,4D,45,20,3A,20,00,0D.0D 

,20,20,20,53,54,41,52,54,41, 1073 <095> 

1052 DATA 44,52,45,53,53.45.20.3A,20,24,00 

,0D,0D,20,20,20,45,4E,44,41, 1014 <129> 

1053 DATA 44,52,45,53,53,45,20,20,20,3A,20 

,24,00,92,01,01,50,52,4F,47, 1136 <228> 

1054 DATA 52,41.4D,4D,20,3A,20,00,12,20,20 

,2A,2A,2A,20,46,41,4C,53,43, 1024 <027> 

1055 DATA 48,45.20,45,49,4E,47,41,42,45,20 

,2A,2A,2A,20,20,92,00,0D,0D, 1058 <09B> 

1056 DATA 2A,2A,2A,20,45,4E,44.45,20,2A,2A 

,2A,00,13,01,20,20,12,44,92, 916 <153> 

1057 DATA 49.53,4B,20,4F,44,45,52,20,12,54 

,92,41,50,45,0D,00,13,20,20, 1151 <035> 

1058 DATA 49,2F,4F,20,2D.20,46,45,48,4C.45 

,52,00,20.D1,B1,20,48,B2.A0, 1606 <012> 

1059 DATA B3,A9,CF,20,FF,B1,20,BE,B4,85,FC 

,20.8E,B4,85,FB,C5,61,A5,FC, 3207 <251> 

1060 DATA E5,62,90,23,A5,FB,C5,5F,A5.FC,E5 

,60,D0,19,20,A7,D4,D0,14,G0, 2060 <112> 

1061 DATA 20,A7,B4,F0.0C,85.F9,20,A7,B4, F0 

.05,85,F8,4C,EF,B0,68,68.20, 2749 <088> 

1062 DATA 43,B3.4C,5F,B4,20,CF,FF,C9,4C,D0 

,09,20,D1,B1,20,48,B2,4C,0B, 2372 <046> 

1063 DATA B6,C9,0D,60,A9,00,85,5E,20,5F,B4 

,20,EA,Bl,20,0D,B5,24,5E,30. 2042 <120> 

1064 DATA 05,20.E4,FF,F0,FB,20.El,FF,F0.26 

,20,9F,B2,24,5E,10,09,20,4E, 2435 Äl9§> 

1065 DATA B5,20,0D,B5,20,60,B5,20,33,B2,2<zi 

,3F,B2,90,D7,A0,B4,A9,28,20, 2190 <207> 

1066 DATA FF,Bl,20,E4,FF,C9,0D,D0,F9,A9,00 

.85,5E,A5.61,85,FB,A5,62,85, 3056 <240> 

1067 DATA FC,20,E0,B2,4C,64,B1,A5,FC,20,4E 

,Bl,A5,FB,85,FF,20,4E,Bl,A9, 3003 <221> 

1068 DATA 20,A0.3A,20,F2,B1,A0,00,20.ED.Bl 

,Bl.FB,20,4E.Bl,C8,C0,08,90, 2566 <070> 

1069 DATA F3,20,ED,Bl,24,5E,30,03,A9,12,2C 

,A9,20,20,D2,FF,20,10,B2,A5, 2190 <059> 

1070 DATA FF,20,4E.Bl,A9,92,20,D2.FF.4C,EA 

,Bl,A9,FF,85,B8,85,B9,A9,04, 3073 <029> 

1071 DATA 85,BA,20,C0,FF,A2,FF,4C,C9,FF,20 

,CC,FF.A9,FF,4C,C3.FF.20,5F, 3315 <189> 

1072 DATA B4.A9,80,85,5E,20,4E,B5,20,48,B2 

,A2,24,A9,2D,20.D2,FF,CA,D0, 2596 <111> 

1073 DATA FA,20,EA,B1,20,EA,B1,20.60,B5,4C 

,C1,B4,20,B8,B5,A6,5F,A4,60, 2812 <015> 

1074 DATA A9,61,20,D8,FF,B0,0A,20,B7,FF,29 

,BF.D0,03,4C.FB,B4,A9,01,20, 2577 <201> 

1075 DATA C3,FF,20,68,B6,A0,B4,A9,4F,20,FF 

,B1,20,F9,Bl,4C,FB,B4,20,68, 2921 <237> 

1076 DATA B6,A9,37,A0,B4,20,FF,Bl,20.F9,Bl 

,A2,08,C9,44,F0,06,A2,01,C9, 2717 <213> 

1077 DATA 54,D0,Fl,A9,01.A8,20,BA,FF,A0,00 

,E0,01,F0,1A,A9,40,8D,20,02, 2403 <101> 

1078 DATA A9,3A.8D,21,02,B9,01,02.99,22,02 

,C8,CC,00,02,90,F4,C8,C8,D0, 2182 <127> 

1079 DATA 0C.B9.01,02,99,20,02,C8,CC,00,02 

,D0,F4,98,A2,20,A0,02,4C,BD, 2018 <025> 

1080 DATA FF,20,B8,B5,A5,BA,C9,08,90,33,A6 

,B9,86,57,A9,01,20,C3,FF,A9, 2800 <022> 

1081 DATA 60,85,B9,20,C0.FF,B0,28,A5,BA,20 

,B4,FF,A5,B9,20,96,FF,20,A5, 2911 <053> 

1082 DATA FF.85,61.A5,90,4A,4A,B0,13,20,A5 

,FF,85,62,20,AB,FF,A5,57,85, 2663 <214> 

1083 DATA B9,A9,00,20,D5,FF,90,03,4C,A3.B5 

,86,5F,84,60.A5,BA,C9,01,D0, 2639 <131> 

1084 DATA 0A.AD,3D,03,85,61.AD,3E,03,85,62 

,4C,FB,B4,A9,13,20,D2,FF,A2. 2300 <120> 

1085 DATA IC, 20. ED, Bl, CA, D0, FA, 60.00,00-, 00 

,00,00,00,00,00.00.00,00,00, 1230 <143> 

© 64'er Listing 2. Der MSE-Lader 


Der MSI 


Der MSE dient zur Eingabe von Maschinensprache-Pro¬ 
grammen. Als erstes müssen Sie den sogenannten 
»MSE-Lader« (Listing 2) abtippen. Dieser erzeugt erst das 
eigentliche MSE-Programm auf Diskette oder Kassette. 
Wichtig: Vor dem Eintippen des MSE-Laders müssen 
Sie unbedingt ein paar Befehle eingeben (ohne 
Basic-Zeilennummer): POKE 44,32 : POKE 8192,0: NEW 

Jetzt können Sie beginnen, das Listing 2 abzutippen. Der 
MSE-Lader erkennt zwar, wenn Sie beim Eintippen der DA- 
TA-Zeilen einen Fehler gemacht haben, aber wenn Sie 
ganz sicher gehen möchten, sollten Sie den Checksummer 
vor dem Eintippen aktivieren. Die Prüfsummen für den 
MSE-Lader finden Sie am Ende der jeweiligen Pro¬ 
grammzeilen. 

Wenn Sie das Listing 2 nicht auf einmal abtippen möch¬ 
ten, müssen Sie vor jedem neuen Laden des Programms 
unbedingt die oben genannte POKE-Zeile eingeben! 

Wenn Sie alles richtig gemacht haben und das Pro¬ 
gramm fehlerfrei abgetippt wurde, speichert es sich nach 
dem Starten selbst auf Diskette oder Kassette unter dem 
Namen »MSE VI .0«. Dieses fertige MSE-Programm laden 
Sie dann bei Bedarf wie ein normales Basic-Programm und 
starten es mit »RUN«. 

So arbeitet man mit dem MSE 

Als erstes möchte der MSE den Namen des zu bearbei¬ 
tenden Programms wissen. Dieser steht in der ersten Zeile 
unserer MSE-Listings. Dann müssen Sie die Start- und 
Endadresse des Programms eingeben. Dies sind die letz¬ 
ten beiden, vierstelligen Hexadezimalzahlen in der ersten 
Zeile unserer Listings. 

Wenn Sie ein Programm von Diskette oder Kassette 
laden wollen, um an einer bestimmten Stelle weiterzutip¬ 
pen c'*3r noch eine Korrektur vorzunehmen, geben Sie auf 
die Frage nach der Startadresse ein »L« ein. Danach müs¬ 
sen Sie < D > oder <T> drücken, je nachdem, ob Sie von 
Diskette oder Kassette (»tape«) laden möchten. Wenn das 
Programm unter diesem Namen nicht auf der Diskette vor¬ 
handen ist oder ein sonstiger Ladefehler vorlag, meldet 
sich der MSE mit »l/O-ERROR«. In so einem Fall drücken 
Sie < RUN/STOP RESTORE> und geben einfach noch 
einmal »RUN« ein. 

Beim Abtippen geben Sie nach und nach die abgedruck¬ 
ten Buchstaben und Zahlen des jeweiligen Listings ohne 
die Freiräume dazwischen ein. Wenn Sie in einer Zeile 
einen Tippfehler gemacht haben, meldet sich der MSE 
sofort mit einem Brummton und der Meldung »EINGABE¬ 
FEHLER«. Nach einem Druck auf die RETURN-Taste kön¬ 
nen Sie mit der DEL-Taste den Fehler korrigieren. Wenn Sie 
das gewünschte Programm vollständig eingegeben 
haben, speichert es der MSE automatisch auf Diskette 
oder Kassette. 

Bei längeren Listings ist es unwahrscheinlich, daß Sie 
das komplette Programm auf einmal eingeben. Sie können 
Ihre bisherige Tipparbeit jederzeit durch <CTRL S> auf 
Diskette oder Kassette speichern und Ihr Werk später fort¬ 
setzen. Sie sollten sich dann allerdings im Heft markieren, 
wie weit Sie beim Abtippen gekommen sind! Später geben 
Sie dann nach dem Laden des ersten Programmteils 
< CTRL N > ein und auf die dann folgende Frage nach der 
Startadresse die Zeilennummer (Adresse), bei der Sie auf¬ 
gehört haben zu tippen. 

<CTRL M> erlaubt Ihnen jederzeit, Ihr Werk listen zu 
lassen. Durch < SPACE > können Sie weiterlisten lassen 
und durch <RUN/STOP> das Listen abbrechen. 

Wenn Sie einen Drucker besitzen, können Sie das Pro¬ 
gramm auch mit <CTRL P> ausdrucken. Mit <CTRLL> 
wird das Programm noch einmal neu in Ihren C 64 geladen. 

(F. Lonczewski/N. Mann/D. Weineck/tr) 
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